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PRINTEMPS 

2 YEUX 2 SESSIONS. 

POUR NE RIEN VOIR. 

DU TOUT. 

Le Sicob, cette an nee, etait interdit aux moins de 18 ans ! Les ordinateurs sont-ils 
devenus pornos, ou les vieux cons preferent -ils rester entre eux ? 



DRdLE de cru 

Les visiteurs reguliers du Sicob 
marqueront cette annee d'une 
pierre noire, ou meme ultra- 
violette, pour ceux qui I'ont 
achetee en option, lis ont cher- 
che en vain le rayon micro- 
informatique. II n'y en avait pas. 
Deja, I'an dernier, on sentait 
une certaine lassitude, un cer- 
tain essoufflement, un genre 
d'envie d'aller se planter la tete 
contre un platane de la part de 
ceux qui etaient venus la pour 
voir de petites machines. En fait 
de petit, cette annee, a part les 
deux ou trois CBM 64 qui se 
battaient en duel sur chacun 
des douze stands Commodore 
et quelques Amstrad, il n'y avait 
rien. Et meme chez ceux-la, 
I'accent etait mis sur les engins 
profession nels comme le PCW 
8512 chez Amstrad et les com- 
patibles IBM et I'Amiga chez 
Commodore. Atari exhibait bien 
ses ST, mais est-ce une petite 
machine ? 

LE BON TEMPS 

Je me suis dome I'impression 



d'etre un vieux con sur un banc. 
"Tu te rappelles d'il y a deux 
ans ? 

- Ah, c'etait le bon temps... 

- Tu te souviens d'Oric ? 

- Ah, on sentait deja pointer 
Goldstar... 

- Et Sinclair ? 

- C'etait encore la gloire ! A fond 
la caisse sur le QL ! 

- Et les MSX ? 

- Arrete ! C'etait le debut, on 
s'attendait a un raz de maree, 
a une invasion. 

- Et Amstrad ? 

- Qa alors, le premier, c'etait 
quelque chose ! Une bombe ! 

- Et Commodore ? 

- Tramiel etait encore la, ca mar- 
chait du feu de Dieu. 

- Et le Texas ? 

- Ah, le TI-99 ! Je I'avais pres- 
que oublie ! Le premier faux pas 
d'un constructeur ! 

- Et le TRS-80 ? 

- Oh dis done, je vais pleurer I" 
Oil sont-ils, ces cons ? Ils nous 
ont laisse tomber ou quoi ? On 
pue, peut-etre ? Les micro- 
informatiqueux ne sont pas 
dignes de beneficier des 
faveurs d'un salon, tout Sicob 
soit-il ? 



Oric a change de mains, et est 
bien trap occupe a peaufiner 
son Telestrat pour alter s'exhi- 
ber. Sinclair, euh... Voir a "Ams- 
trad". MSX, voir a "deconfi- 
ture". Amstrad est la, certes, 
montrant ses PCW et son 
absence de disquettes. Com- 
modore est la aussi, mais etait- 
ce bien necessaire ? Texas, 
out, ga n'existe plus. Les autres 
HP, Canon, Apple, Aquarius, 
Lynx, Jupiter Ace, Multitech, 
Newbrain, Dragon, Panasonic, 
Dai et consorts ont disparu, se 
sont fait porter pales, n'ont pas 
juge bon de se compromettre 
avec les marchands de soupe, 
ont glisse dans I'escalier, ont 
apporte un mot d'excuse signe, 
sont morts, ont ete pris dans 
des embouteillages, mais pas 
necessairement dans cet ordre. 

LES SURVIVANTS 

Bon, Commodore est la. Un 
stand par etage (il y a cinq eta- 
ges au total, en comptant le fes- 
tival Infodial Videotex et le Sicob 
Boutique), parfois deux. Toute 
la gamme est representee : le 
C64, leC128, les PC 10et20, 



le AT (leur nouveau compatible 
IBM), jusqu'a I'Amiga qui 
rumine iniassablement la meme 
eternelle demo nullarde. Pas de 
prix sur les stands, pour les 
obtenir, il faut aller discuter le 
bout de gras avec les commer- 
ciaux dans les replis feutres des 
paravents en Plexiglas fume. 
Genre : "on n'est pas des mar- 
chands mais des esthetes". 
Atari est la aussi. Meme chose 
que Commodore : des stands 
partout, gigantesques, avec des 
520 ST, des 1040 de la meme 
eau et quelques 130 XE. La 
aussi on a largement accentue 
le cote pro : les logiciels presen- 
tes sont des caiques, des bases 
de donnees, des gestions de 
fichiers, des tableurs ... 
Casio, au Sicob Boutique, met 
le paquet sur la FX 70OOG : une 
calcu (latrice, lette, leuse, tante, 
tta mon amour, on ne sait plus 
ce qu'il faut dire, au secours, 
I'Afnor revient !) qui dessine ins- 
tantanement n'importe quelle 
fonction sur son ecran LCD, ce 
qui est bougrement pratique a 
I'approche du bac, enfin un qui 
se preoccupe des morveux ! <ja 
fait plaisir. 



Dans une contre-allee, loin de 
tout, on peut admirer la gamme 
QuickShot, du I au X. Le I et le 
II, vous les connaissez, le IX pa 
va pas tarder, les autres valent 
le coup d'oeil, mais on se 
demande a quoi ga peut bien 
servir : le VII ressemble a Gol- 
dorack, le IV a un tube d'aspi- 
rine, le V au signe de reconnais- 
sance des membres de la secte 
des adorateurs de I'enclume et 
le X a rien du tout. 
Un peu partout, les construc- 
teurs presenter^ leurs machines 
(des compatibles IBM, pour la 
plupart) equipees des ecrans a 
cristaux liquides nouvelle gene- 
ration. Teinte rougeatre. on peut 
surtout remarquer la qualite 
visuelle de la chose : meme de 
cote, on voit parfaitement bien 
ce qui est inscrit sur I'ecran. 
Superbe, et cher. Hein ? Non, 
un zero de plus. Merci, au 
revoir. 

Et les PTT ? Qu'est-ce qu'ils 
foutent la, les PTT ? Ils presen- 
tent leurs nouveaux minitels. 
Seul le 1 B se demarque un peu 
du lot : il a des fleches de cur- 
seur, une touche CTRL et une 
touche FNCT. De quoi foutre la 



pagaille sur n'importe quel 

serveur. 

Et Amstrad ? Qu'est-ce qu'ils 

foutent la, Amstrad ? Rien, Ah 

bon. 

Fin de la visite guidee. 

2 YEUX ? 

Pour ce tour complet, mesda- 
mes et messieurs, je n'ai pas 
utilise deux yeux, non mesda- 
mes, meme pas un ceil, non non 
non, j'ai utilise tres exactement 
un seizieme d'oeil. Le reste se 
reposait pendant ce temps-la. 
Mon pote qu'avait 17 ans n'a 
pas pu rentrer, et le plan de 
I' exposition que je lui ai ramene 
au troquet ou il etait alle 
m'attendre I'a completement 
rassure : il n'a rien manque 
(cela dit, il m'a attendu assez 
longtemps pour etre complete- 
ment beurre, il en etait a son 
treizieme pastis en deux heu- 
res, en plein apres-midi, les jeu- 
nes de maintenant n'ont plus 
aucun savoir-vivre). 
A I'annee prochaine, les amis, 
pour encore pire I 



BIDOUILLE GRENOUILLE cinoche-tel oche p«g..2,35 musique a ^ Pag e 24 



Ou comment tricher, pirater, modifier, traliquer, mmgoulllor, bidouil- 
ler at grenouiller avec le* logiciels du monde entier. Mala dana la legs- 
lite, au moins ? Of course, mon General I 
Lire page 16 



C'est nouveau, 9a vient de sortir : 

L'actualite de la micro-informatique pages 1 1 .12.13.14. 



CONCOURS PERMANENT* 

Voire programme, non content de vous rapporter 1 .000 francs par page publiee, peut vous rappor- 
ler 20.000 francs cnaque mois ou un voyage en California pour deux, chaque trimestre. 
Reglement en page interieure 



DEULIGNEURS les faineants sont page 16 



INF0-BD : TOUTE L'ACTUALITE EN PAGE 22 

FORMATION A LASSEMBLEUR 

Les amateurs eclaires vous attendent en page 34 



DES PROGRAMMES POUR VOTRE ORDINATEUR : 
AMSTRAD • APPLE lie ET lie • CANON X-07 • CASIO FX 702-P • 
COMMODORE 64 ET COMMODORE VIC 20 • EX ELVISION EXL 100* 
MSX et compatibles • ORIC 1 ET ATMOS • SINCLAIR ZX 81 ET SPECTRUM 
TEXAS TI99/4A • THOMSON TQ7, TO7/70, ET M05 • 
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2 LE MATIN de Jean-Jacques Beineix 
2. HIGHLANDER de Russell Mulcahy 
L'HISTOIRE OFFICIELLE de Luis Puenzo 
4. MAXIE de Paul Aaron 
5. CONSEIL DE FAMILLE de Costa-Gavras 

6. TUTTI FRUTTI de Michael Dinner 

7. L'AME SOEUR de Fredi M.Murer 
LES FEUX D'HIMATSURI de Mitsuo Yanagimachi 

9. L'HONNEUR DES PRIZZI de John Huston 
10. GINGER ET FRED de Federico Fellini 



MAXIE 



de Paul 
AARON 




avec Glen CLOSE (Jan Cheyney et 
Mule Malone), Mandy PATINKIN (Nick 
Cheyney) et Ruth GORDON (Mr* 
Lanvln). 

La gentille Jan vient d'emmenager dans 
un gentil appartement cosy que son gen- 
til man retape gentiment, le soir apres son 



ramene dans les annees 20 !). Deluree, 
grossiere autant que seduisante, Maxie 
etait une danseuse de cabaret qui avait eu 
droit a quelques scenes (remarquees) 
dans un film muet. C'est sur la route qui 
la menait vers son premier grand role 
qu'un platane maladroit I'avait arrachee, 




gentil boulot. C'est en arrachant les 42 
couches de papier peint qui recouvrent les 
murs du salon qu'ils decouvrent un gentil 
mot signe Maxie Malone. lis s'en vont 
questionner leur gentille logeuse, Mrs Lan- 
vin, qui leur raconte le tragique destin de 
Maxie, sa copine de jeunesse (ca nous 



a tout jamais, des griffes d'Hollywood. 
Curieux comme c'est pas permis, les gen- 
tils Jan et Nick se projettent le film delirant 
qui avait vu Maxie debuter a I'ecran. Peu 
apres (Jan est partie se coucher) le fan- 
tdme de Maxie apparait a Nick I Un reve 
qui se poursuit quand Nick se pieute a son 



DELTA FORCE 



de Menahem 
GOLAN 




avec Chuck NORRIS (Major Scott 
McCoy), Lee MARVIN (Colonel Nick 
Alexander), Hanna SCHYGULLA (Ingrid 
Harding), Martin BALSAM (Ben Kaplan), 
Shelley WINTERS (Edle Kaplan) et 
Robert VAUGHN (General Woodbridge). 

Comme prevu, ca commence mal : Chuck 
Norris en combattant d'elite range "defi- 
nitivement" des grenades qui rempile pour 
massacrer d'immondes malpropres basa- 
nes, on connaft ! Qu'on se souvienne seu- 
lement (mais vite, hein I) des navrants Por- 
tes Disparus I, II ou Invasion U.S.A. Mais, 
pour une fois, le scenario est en beton et 
renvoie Norris a son numero de danseuse 
sanguinaire, mais a rien de plus. Un role 
parmi les autres, un point c'est tout ! 
Et puis miracle pour une production Can- 
non, cette bonne surprise en appelle 
d'autres : Lee Marvin en meneur de trou- 
pes, Hanna Schygulla en hotesse sexy et 
courageuse, c'est pas rien tout de meme ! 
Plus les seconds roles, tous epatants et 
i, chose rarissime dans un film rata- 



tour : Jan lui temoigne en effet une ardeur 
tout a fait inhabituelle... Maxie vient de 
prendre possession de son corps ! I 
Evidemment I'existence gentillette du 
jeune couple va etre totalement boulever- 
see. Nick doit affronter tour a tour les cole- 
res de la pauvre Jan, jalouse de I'occupa- 
tion de son corps ou les assauts fougueux 
de Maxie, la reine des pieds dans le plat ! 
Tout ce que demande Maxie c'est de pou- 
voir enfin jouer ce role qu'elle attend 
depuis si longtemps; sa B.A. accomplie, 
elle s'en ira comme elle est venue. Pour 
de bon, dit-elle I 

Autour d'un sujet scabreux et galvaude (le 
retour d'un fantome) Maxie est impression- 
nant de finesse, de justesse et d'origina- 
iite. Le film bascule constamment d'un bon 
gros sentiment a I'autre : hilarant (le cock- 
tail collet monte, les essais du film), ten- 
dre (Nick perdu entre deux femmes qui 
n'en paraissent qu'une), emouvant (la ren- 
contre de Mrs Lanvin, vieille et de Maxie, 
toujours jeune). Tout, absolument tout est 
reussi. Et quand bien meme ca ne le serait 
pas, lepoustouflante composition de Glen 
Close effacerait toute imperfection : godi- 
che et timide en Jan, elle se metamor- 
phose en un eclair en Maxie, sensuelle el 
vulgaire. Sans trucage, comme si elle etait 
rdellement habitee par cette grande folle 
de Maxie. 
Un "Maxie" plaisir, tout simplement. 



PARIS 
MINUIT 

de Frediric ANDREI 



ecrit le scenario, tenu la camera et s'est 
donne le (beau) role principal. Qu'il est 
doux d'etre bon avec soi-meme ! 
En fait de bonte, Paris Mlnult est essen- 
tiellement un prospectus anime pour les 
hordes dechatnees de touristes abordant 
Paris pour la premiere fois. Une visite agre- 
mentee d'une croquignolette partie de 




avec Frederic ANDREI himself (Serge), 
Isabelle TEXIER (Marie) et Gabriel CAT- 
TAND (Commlssaire Belland). 

Curieusement c'est au moment oil Jean- 
Jacques Beineix nous assene sa troisieme 
merveille (37°2 le matin), que le petit fac- 
teur de Diva (premier film de Beineix, 
triomphe, culte impair et passe) revient 
enfin au cinoche. Apres Diva, Frederic 
Andrei pensait avoir fait le tour du metier 
d'acteur. II a alors pris le temps, depuis 
1981, de s'attaquer au reste. Du coup il 
a quasiment tout fait dans Paris Mlnult : 
il a cree, avec quelques potes, sa propre 
boite de production (Mai Production), il a 




gendarmes et voleurs, destinee a occuper 
les spectateurs parisiens du film. Une par- 
tie qui s'ouvre par un braquage rate : le 
bijoutier et deux des agresseurs restent sur 
le carreau. Seuls Marie (blessee au genou) 
et Serge (blesse au bras) parviennent a 
s'enfuir. lis n'ont pas tue, meme pas tire. 



La police ne veut pas le savoir; il faut les 
coffrer. Et vite, pour rassurer les popula- 
ces terrorisees par I'insecurite galopante 
(plagiat de titre de France-Soir). 
Paris est boucle, Marie et Serge ne peu- 
vent theoriquement plus s'echapper. Seule 
issue possible; se separer pour mieux se 
retrouver. lis inventent un jeu de pistes a 
travers la capitale, par Tintermediaire de 
cartes postales, d'empreintes sanglantes 
et de messages poetiques diffuses sur une 
radio locale. A chaque demi-heure de la 
nuit correspond un rendez-vous sous un 
celebre monument parisien. Une clo- 
charde, 300 motards et le commissaire lui- 
meme se feront les complices de ce jeu 
desespere. A I'aube de cette nuit de 
chasse, les flics saisiront la cle du manege 
mais il sera trop tard ! 
Tout cela est tres original et tres gentiment 
traite. Ca serait meme super si les dialo- 
gues et les personnages etaient a la hau- 
teur du sujet. Mais les flics sont tenement 
cons, on fait dire aux gens des trues tene- 
ment invraisemblables qu'on verse sou- 
vent dans la parodie du polar version "A 
bout de souffle". Si c'est volontaire, c'est 
rate; si c'est pas fait expres, c'est rate 
aussi, na I 

Au debut on croit meme a un brouillon de 
vrai film : image approximative, rythme 
soporifique. Et puis, mine de rien, la petite 
musique de la nuit parisienne nous attrape 
et nous fait trembler en attendant Tissue 
de la cabale. Andrei va surement faire 
beaucoup mieux bientot; offrons-lui alors 
toute notre indulgence en attendant ! 



taboum (pour vous situer I'ambiance sur 
la bande son !). 

Pire : figurez-vous que cette accumulation 
de stars ne parvient meme pas a gftter le 
rythme et la credibility de Thistoire ! Une 
histoire tres "inspiree" du detoumement, 
le 1 4 juin 1 985, d'un Boeing de la TWA par 
une bande de Chiites belliqueux, qui recla- 
maient alors la liberation de leurs compa- 
gnons emprisonnes en Israel. Le 17 juin, 
les commandos Delta (les forces specia- 
ls d'intervention americaines) decollaient 
de leur base de Caroline du Nord ... mais 
n'avaient pas a intervenir. Le 30 juin, les 
otages etaient liberes grace a la 
negotiation. 

Une solution diplomatique devenue extre- 
mement discrete dans le film au profit de 
I'importance de la Force Delta ! On a 
decalle Taction au 19 juillet 1985, quand 
deux membres de la "Nouvelle Organisa- 
tion Revolutionnaire" s'emparent du 
Boeing peu apres son decollage d'Athe- 
nes, celebre aeroport-passoire ! Pendant 
que la Delta Force prepare precipitamment 
sa petite valise avant de s'envoler pour les 
belles plages du Moyen-Orient, la sueur 
coule a dots le long des tempos emues des 
otages. Le temps de tabasser trois Mari- 
nes de retour de vacances (et d'en tuer un 
en passant), de trier les passagers juifs 
(objets de toute leur "sollicitude"), de jouer 
a la puce qui saute entre le Liban et TAkje- 
rie et I'avion atterrit a Beyrouth, la station 
balneaire bien connue. II est temps pour 
les membres de Delta Force de sortir les 
peintures de guerre et de raser les murs 
vers leur devoir... 




Bon, d'accord, les Americains sont une 
fois de plus les plus beaux, les plus intel- 
ligents, les plus forts; du cinema au garde- 
a-vous devant le pere Reagan, le doigt sur 
la couture du treillis ! Mais cette fois, je 
veux bien termer les yeux sur le parti pris 
guerrier, et me contenter de la superbe 
reconstitution du detoumement d'avion. La 
febrilite des pirates, les petites lachetes et 
la terreur des passagers, le sang-froid de 
I' equipage sont super bien rendus. C'est 
bien simple, on s'y croirait (aglagla I). Dans 
la meme veine, Tattaque du Q.G. libanais 
par les Ricains n'est pas purement bestiale 
et obeit a une strategic pas trop conne. 
Delta Force m'a tenu accroche a mon fau- 
teuil pendant plus de deux heures, c'est 
toujours bon a prendre I 
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SEMAINES 

d' Adrian LYNE 



avec Mickey ROURKE (John) et Kim 
BASINGER (Elizabeth) 

Madre de dios, que je Tattendais ce putain 
de film ! Pensez done : mon idole d'entre 
mes Ktoles, le genialissime Mickey Rourke, 
entraine dans de troubles gateries sado- 
masos. Je pensais revivre une nouvelle 
fois le frisson bestial, le nirvana du cine- 
phile atteint en decembre dernier avec le 
meme Mickey Rourke dans L'annee du 
dragon. Bien sOr, e'eoup-ci ca n'est ni 
Cimino a la realisation, ni Ariane en faire- 
valoir bandant mais on pouvait y croire 
avec Thonnete Adrian "Flashdance" Lyne 
et la sculpturale Kim Basinger. 




Et puis plot, la deception, presque rien de 
bien craquant a se mettre sous la dent. 
Obsede par T obligation de construire de 
belles images, de tremper outrageusement 
dans Testhetisme video-clips, Lyne renoue 
avec la detestable manie de filmer un 
scenario-gruyere (avec beaucoup de 
trous). Evidemment, Mickey nous rend 
maousse a force de faire briller ses yeux 
cernes de sa sublime (et deja celebre) 
lueur cynique et cruelle. Mais un ceil, 
meme fabuleux, ne suffit pas a repaitre 
Tamateur des sensations fortes que This- 
toire promettait. Visez un peu : Elizabeth, 
superbe plante vendeuse de tableaux se 
laisse embobiner par le sourire etrange de 
John, richissime courtier de Wall Street. 
Elle est divorcee, done blasee des mecs, 
et reve toujours, la folle, d'un grand elan 
romantique; lui est un joueur en amour. Un 
joueur habile, subtil... et vaguement mal- 
sain ! Pour John, Elizabeth va accepter de 
bander ses yeux, de ramper vers son 
"maftre", de lui offrir de superbes strip- 
teases. Question emotions, la nana va etre 
servie, mais pas vraiment dans les plats 
qu'elle esperait I 

Adrian Lyne nous fait le plan "branche" 
en garnissant ces arguments allechants 
d'un empillage de morceaux rock (Roxy 
Music, Eurythmics, Joe Cocker, une ving- 
taine au total) qu'il a eu le "bon" gout de 
nous servir en Integral. Qa monsieur, ca 
s'appelle tout betement rallonger la sauce 
quand on rien a dire. 



AMUSE-GUEULES: 



] 



Comment voulez-vous que j'm'en sorte 
avec le peu de place qui me reste ? ! 
Exceptionnellement, les deux amuse- 
gueules de la semaine se laissent voir sans 
deplaisir, meme s'ils avaient gagne a etre 
plus courts et plus vifs. 

Cette remarque vaut surtout pour MAINE 
OCEAN (Prix Jean Vigo 86) qui fait bien 
une demi-heure de trop. II fallait bien ca 
pour que Jacques Rozier (le realisateur) 
nous impregne de r atmosphere bizarre, 
dejantee de son film. L'histoire de deux 
controleurs de la SNCF (Luis Rego et le 
formidable Bernard Menez), tatillons a 
T extreme, qui vont emmerder Dejanira, 
une somptueuse bresilienne qui voyage 
innocemment a bord de tour train, le 
Maine-Ocean. Les aventures de la belle au 
ticket perdu peuvent commencer : 
d' Angers a Tile d'Yeu, elle croisera suc- 
cessivement une avocate deluree, un 
pecheur au grand cceur, les deux contro- 
leurs en goguette avant de retomber entre 
les griffes de son impresario. Sympa, ori- 
ginal, quelquefois tres marrant. Mais trop 
long ! 



LA LOI DES SEIGNEURS raconte le dur 
apprentissage de la discipline et du code 
de Thonneur a I'lnstitut militaire de Caro- 
line du Nord (mention bien pour les 
decors), version hard de West Point. La 
nouvelle promo en bave un max, surtout 
un gros .qui va pas tarder a se suicider, 
et le noir, qui va pas tarder a etre jolimenl 
torture. Les deux sont les victimes des 
"Dix", une societe secrete (coucou le Ku- 
Klux-Klan I) qui veille a ©carter de Tecole 
les elements qui ne correspondent pas a 
la norme du beau soldat athletique et 
blanc I Will, done parfait du moule de 
Tecole, mais intelligent et sensible, se 
revolte contra ce groupe. Au peril de sa 
carriere mais surtout de sa propre vie... 
Ce ramassis de cliches (le Sud raciste, la 
bande de potes aux talents complemen- 
taires, le beau heros seul contre tous, etc.) 
ne trouve jamais vraiment son chemin 
entre le "documentaire" sur la dure vie 
des futurs officiers et la traque "a sus- 
pense" du groupe des Dix. Neanmoins, les 
bons moments voyeurs sont suffisamment 
nombreux pour qu'on y prenne gout ! 
Sympa bis I 



MISSION F15 

Aux commandes d'un redoutable chasseur F15, preservez 
I'integrite de votre espace aerien prefere. 

Thierry MARTIN 

Mode d'emploi : 

Necessite d'un joystick et d'une extension 16 Ko. Sauvegardez a la suite 

ces deux programmes. Avant la frappe ou le chargement de ces derniers, 

faites : 

POKE 44,24 : POKE 6144,0 : NEW 

Les regies sont incluses dans le premier programme. 
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:a 



130 PRINT" 

a a^r" 

190 PRINT" 

a? k " 

200 PRINT" S3 k 

as? •. . " 

210 PRINT" 5a 

a k " 

220 PRINT" S3 k 

SC k. *' 
230 PRINT" S3 k 
r 2 k " 

240 PRINT" 33 
a Btr" ; 

241 FORT=0TO17 

242 RERDC : P0KE4 1 83+T*22 , C ■ F0RM= 1 TO 
200 : NEXT : NEXT 

S4S mrme, 1,13,32,13,1,18,20-9, 14 

,32,20,8,9,5,18,18,25 

245 IFTT=1THENRETURH 

250 P0KE36878,15 

260 RERDA , B = P0KE36875 , fl : F0RT= 1 TOB : 

NEXT : P0KE36875, : I FB= 1 50 1 THEN5 1 

270 GOTO260 

280 DRTfl215,300,215,300,215,300,21 

7, 700, 209, 300, 215, 700, 203, 300, 203, 

300,203,300 

290 DFITfl209, 700, 20 1,300, 203, 700 

300 DflTR215,300,215,300,215,300,21 

7 , 700 , 209 , 300 , 2 1 5 , 700 , 283 , 300 , 203 , 

300,203,300 

310 DHTfl209,700,203,300,215,700 

320 DATA215,300,215,300,215,300,21 

5 , 700 , 209 , 300 , 209 , 700 , 203 , 300 , 203 , 

300 , 203 , 300 , 203 , 300 

330 DAT A209 , 300 , 209 , 300 , 289 , 700 

340 DATA215,300,215,300,215,300,21 

5 , 700 ,289, 300 , 209 , 700 , 203 , 300 , 203 , 

300 , 203 , 300 , 203 , 300 

350 DF)Tfl209,300,209,300,209,700 

360 DHTfl217,300,217,300,217,300,21 

7,700,215,300,215,700,209,300,209, 

300 , 209 , 300 , 209 , 706 

370 DRTA203 , 300 , 203 , 700 

380 DATA217,300,217,300,217,300,21 

7, 700, 215, 300, 215, 700, 209, 300, 209, 

300,209,300,209,700 

390 DAT A203 , 300 , 2 1 5 , 700 

400 DATA215, 308.-215, 300, 215, 300, 21 

5 , 700 , 209 , 380 , 209 , 700 , 203 , 300 , 203 , 

300 , 203 , 300 , 203 , 30O 

410 DAT A289 , 300 , 209 , 300 , 209 , 700 

420 DATA215,388,215,300,215,300,21 

5 , 700 , 209 , 300 , 209 , 1 500 

430 DAT A209 , 300 , 289 , 300 , 209 , 300 , 2 1 

5,300,217,700,217,708,215,1000,203 

,380,195,1500 

440 DRTR 1 95 , 300 , 1 95 , 300 , 20 1 , 308 , 28 
5, 388, 195, 388, 205, 308, 225, 300, 221 , 

1000,215,380 

450 DRTR203,1508 

468 BAT A2 1 7 ^300 , 21 5, 300 , 209 , 300 , 20 

3 , 300 , 209 , 308, 2 1 5 , 300 , 203 , 308 , 28 1 , 

300 

470 DATA215, 1080,203,300, 195, 1580 

480 DRTR 1 95 , 300 , 1 95 , 300 , 20 1 , 300 , 28 

5 , 308 , 1 95 , 308 , 285 , 300 , 225 , 380 ,221, 

1000,215,300 

490 DRTR203,1500 

588 DRTR2 1 7 , 388 , 2 1 5 , 308 , 209 , 300 , 20 

3 . 300, 209, 380, 215 , 3R0, 283, 300, 281 , 

388,195,1501 

510 PR I NT "TWO aREGLES" 



528 PRINT" " 

538 PRINT" Lfl 3EME GUERRE MONDIAL 

E R ECLATE, VOUS DEVEZ, fi BORD DE V0 

TRE RVION 'F15' ".: 

540 PRINT"DESCENDRE LE PLUS GRRND 

NOMBRE POSSIBLE B'AVIONS ENNEMIS T 

OUT EN PRESERVANT"; 

550 PRINT" VOTRE CRRBURRNTCCfl) . " 

568 PRINT"*) POUR DECOLLER, RPPUVE 

Z SUR "F1',LE PILOTRGE RUTOMRTIQUE 

S'OCCUPE DU RESTE" 
570 PRINT" VOUS VOVEZ ENSUITE RPP 
RRRITRE DEUX ECRRNS.CELUI DE DROIT 
E REPRESRNTE CE "; 
588 PR I NT "GUI EST EN DESSOUS DE VO 
US ET CELUI DE GRUCHE CE QUE VOUS 
VOVEZ DEVRNT VOUS." 



598 GETR$:IFfl$< 



"THEN610 



600 GOTO590 

618 PR I NT "^ VOUS DEVEZ PLRCER LES 

DEUX CURSEURS DE L'ECRRN DE GRUCH 
E EN FRCE DES "i 

628 PR I NT "RV IONS QUI RRRIVENT ET B 
OMBARBER LES BRTERUX DE L'ECRRN DE 

DROITE." 
638 PRINT" RPRES QUELQUES MINUTES, 
VOUS RRRIVEZ RU CHALLENGE OU VOUS 
DEVEZ HBRTTRE LES"; 
640 PRINT" RVIONS QUI SE PRESENTEN 
T DEVRNT VOUS ET LORSQU'UN GROS RV 
ION VOUS DOUBLERfl"; 
650 PRINT", TIREZ DESSUS JUSQU'fl CE 

QU'IL EXPLOSE." 
660 PRINT" RPRES LE CHALLENGE, VO 
US RECOMMENCEREZ UNE NOUVELLE MISS 
ION RVEC LES "; 

670 PR I NT "POINTS ET LE CRRURRNT QU 
E VOUS RUREZ flCCUMULE." 
680 GETB* : IFB*O""THEN700 
698 GOTO680 

780 PR I NT "3 LORSQUE VOS ENNEMIS fl 
URONT EU RRISON DE VOUS, VOUS DEVRE 
Z SIGNER VOTRE " i 

710 PRINT"MISSION EN INSCRIVRNT VO 
TRE NOI1 RVEC Lfl MRNETTE. " 
720 PRINT"*POUR FRIRE DEFILER LES 
LETTRES, RPPUVEZ SUR LE BOUTON" 
738 PRINT"*POUR AVRNCER,ORIENTEZ V 
OTRE MRNETTE VERS LR DROITE" 
748 PRINT"*ENFIN LORSQUE VOUS RVEZ 

FINI,ORIENTEZ VOTRE MANETTE VERS 
LE BAS" 

758 GETC$IFC*0""THENEND 
768 G0T0758 

RE ADV. 



LISTING 2 



1 REM*************** 

2 REM* MISSION F15 * 

3 REM*PAR MARTIN T.* 

4 REM* 16 ANS * 

5 REM* VIC 28+16K * 

6 REM* ET JOYSTICK * 

7 REM*************** 
10 DIMA(12,6> 

28 P0KE36879 , 9 ; P0KE36878 , 15 = RESTOR 

E 

30 PRINT "M" 

40 P0KE36869,285 

50 F0RT=5 1 20TO6079 : READA : POKET , A : N 

EXT 

60 DATA209 , 2 1 , 1 62 , 42 , 68 , 84 , 1 36 , 248 

70 DATA16, 16,32,32,64,64, 128, 123 

80 DATA4 1 , 24 1 , 34 , 34 , 68 , 68 , 1 36 , 1 36 

90 DATAS1, 127,0,255,4,4,42,8 

100 DATA17,240, 15, 127, 128, 128, 127, 

17 

110 DATA37, 1,254, 194,60,44,216,24 

120 DATR4,4,8,8,16,127,128,128 

1 30 DRTR64 , 64 , 65 , 66 , 68 , 200 , 40 , 63 

1 40 DRTR42 , 84 , 236 , 58 , 1 , 1 , 1 , 255 

1 50 DATA64 , 64 , 64 , 64 , 96 , 255 , , 8 

160 DATA32,32, 16, 16,8,254, 1, 1 

170 DATA42,32,31, 16, 10,8,4,4 

180 DATA36,7,254,2,63,35,13,30 

190 DATA138, 131,65,65,32,32, 16, 16 

200 DATA8 , 255 , 8 , 27 , 1 28 , 255 , 64 , 69 

218 DATA8,8,4,4,2,2, 1, 1 

228 DATA32, 63, 16,21,8, 15,4,4 

238 DATA34, 62, 15, 248, 15, 244, 15, 243 

240 DATR36 , 2 1 6 , 255 , 8 , 255 , 8 , 255 , 8 

258 DRTR 1 06 , 1 06 ,10, 250 , 67 , 67 , 1 38 , 1 

38 

260 DRTRO, 0,8, 0,255, 255, 0,0 

270 DRTR85,69,56,64,219,203,203,21 

9 



288 DRTR80 ,17,226,4,3,5,16,21 

290 DRTR68 ,136,16, 32 , 63 , 255 , 1 92 , 64 

300 DRTR66 , 66 , 65 , 65 , 1 92 , 1 92 , 64 , 64 

310 DRTR214, 1,255,0,255, 128, 127,64 

320 DRTR255, 8,240, 15,248, 15,252,4 

338 DATA17,34,68, 136, 16,32, 126, 162 

348 DATA35 , 34 , 1 63 , 1 62 , 35 , 32 , 36 , 36 

358 DATA105,0, 105,0,255,0,47, 10 

36<i) DATA85, 3 1,78, 64, 192,8,255,8 

378 DATR95, 89, 88, 89, 95, 64, 255, 69 

380 DRTRO, 8,0, 0,8, 0,8,8 

390 DRTA181, 129,255, 129, 181, 1,255, 

16 

400 DRTR8, 0,0, 0,0, 0,0,0 

410 DRTfll 19, 35, 119, 0,6, 112, 143, 68 

420 DRTR57, 69, 69, 69, 57, 8, 254, 66 

430 DRTfll 13, 31, 113, 17,241,1, 1,109 

448 DRTR32, 16,8,4,2, 1,0, 128 

450 DRTR0, 8, 8,0, 1,2,4,8 

460 DATR169, 168, 168,235, 106, 186, 10 

6,186 

478 DATR163, 15,8,255, 181,0, 102,0 

480 DATA 149, 252, 14, 145, 145, 145, 142 

, 289 

490 DAT A64 , 64 , 94 , 97 , 1 8 1 , 1 05 , 1 1 3 , 94 

500 DRTfll, 183, 183, 1,119,87, 113,1 

518 DRTR8, 7, 60, 66, 66, 66, 66, 60 

520 DflTfl.32 , 1 92 , 238 , 1 70 , 238 , 238 , 1 78 

, 233 

530 DflTR53,5,35,5,117,85, 117,7 

540 DHTFI30, 62, 54, 54, 54, 54, 62, 6© 

558 DflTR2,6,6,6,6,6,6,4 

560 DATA30 , 62 , 6 , 30 , 60 , 48 , 62 , 60 

570 D ATR38 , 62 , 6 , 38 , 62 , 6 , 30 , 68 

580 DRTR 18,54, 54 ,62,62,6,6,4 

590 DRTH38 , 68 , 48 , 62 , 62 , 6 , 30 , 66 

680 DRTR30 , 60 , 48 , 62 , 62 , 54 , 62 , 60 

6 1 8 DATR38 , 62 , 6 , 6 , 6 , 6 , 6 , 4 

620 DflTflSu, 62, 54, 62, 62, 54, 62, 68 

630 DATR38 ,62, 54 , 62 , 62 , 6 , 38 • 60 

640 DRTH7 ,8,3 , 3,15 , 8 , 3 , 63 

650 DATA248, 8, 8, 8, 243, 8, 8, 254 

66Q DflTRO , O , O , , 8 , 255 , , 

£70 DRTH129, 128, 128, 128, 128. 128, 12 

p t * 7,p 

680 DRTR24 , 3C , 66 , 90 , 1 65 , 1 65 , 23 1 , 1 6 

n 

630 DRTR231, 189, 129,219, 153,66,36, 

24 

7O0 DRTR24, 36, 66, 98, 165, 165, 231 , 16 

710 DRTR165, 189, 129,219, 153, 16p, 18 

9,165 

720 DflTR231, 165, 189, 153, 195, 153, 16 

5, 165 

730 DRTR 1 65 , 1 53 , 1 95 , 2 1 9 , 1 53 , 66 , 36 , 

24 

748 DflTfl 1 , 2 , 4 , 8 , 1 6 , 32 , 64 , 1 28 

750 DATA© ,8,0,0,0 , O , 8 , 255 

760 DflTfl 1 28 , 64 , 32 , 1 6 , 3 , 4 , 2 , 1 

770 DflTRO, 1,0,0,32,43,31, 15 

780 DflTfl 16, 1 7 , 146, 84 , 56 , 1 24 , 255 , 25 

p, 

790 DflTflO , , , , 8 , 24 , 248 , 224 
888 DflTR24S,252,254,255,254,2 



14 



818 DRTfll27, 127, 127, 127,62,28,8,8 
328 DflTflB , 4 , 32 , 32 , 8 , 5 , , 1 44 
338 DflTfl 1 23 , 4 , 37 , , 69 ,16, 38 , 29 
848 DflTfl 1 68 , 48 , 8 ,64,16,4 , 64 , 33 
850 DRTA4 ,32,36,0,9,1, if, 8 
860 DflTfll88,25,8, 129, 18,8,4,8 
870 DflTfll 1, 68,0i 34, 48, 128, 0, 36 
830 DflTfl8,8, 1,1,8,8,8,8 
898 DFITfl64, 16,4,4,8,8,8,8 
900 DATA128, 128,0,0,0,0,0,0 

98 1 DATA64 , 64 , 96 , 1 44 , 1 36 , 1 32 , 1 38 , 6 
5 

982 DATA8,8,3, 12,51,284, 179, 172 
903 DATA15,248, 15,243, 12,258,8, 18 

984 DATfl255,8,255,192,252, 148,148, 
148 

985 DflTfl236 , 96 , 229 , 64 , 7 1 , 69 , 7 1 , 64 

986 DATR103, 103, 1,61,67,67,67,61 
907 DAT A255 , 8 , 255 , 7 , 48 , 8 , 248 , 8 
903 DATA252 , 3 , 252 , 243 , 44 , 35 , 32 , 42 

909 DATAO , 1 92 , 43 , 204 ,51, 204 ,51,1 3 

910 DflTflO, 0,0, 0,8, 192,64,64 

920 DATA24 , 1 82 , 66 , 1 53 , 1 53 , 66 , 1 02 , 2 

4 

938 DATAO ,8,8,42,23,1 27 , 8 , 

948 DflTflO, 0,0, 0,4, 3, 1,8 

950 DATfl8 , 8,73 , 42 , 28 , 255 , 255 , 8 

968 DflTflO , , , 8 , 1 6 ', 224 , 1 92 , 8 

96 1 DflTflfifi , 6R . 63 . 68 • 63 • 6ft , 68 , 68 

962 DATFI16, 16,56, 124,254,214,56, 12 
4 

Suit* page 10 



Vive la France et les joueurs 
d'accordeon. Qu'il fait ton vivre 
dans ce merveilleux pays, patrie 
de tous les arts et de toutes les 
techniques. Et la liberie, hein, la 
liberie ? Quel pays peut se vanter 
de cherir plus que nous la liberie ? 
Liberie, liberteeeeeeeee cherie- 
eu, tara tsoin tsoin. 
Liberie, mes genoux : ici, on 
emmerde les pseudo-pirates, des 
braves p'tits gars bien de chez 
nous qui ne font qu'enfreindre 
gentiment des lois faites par des 
vieux pour des vieux. Ici, on fout 
la paix aux vieux possesseurs de 
magnetos qui recopient la cin- 
quieme symphonie de Bach pour 
leur copine d'hospice et on veut 
foutre au trou les jeunes posses- 
seurs de drives qui recopient Pac- 
man pour leur petite sosur. 
Ici on protege les grands inge- 
nieurs en informatique qui, apres 
30 ans d'etudes, ne sont pas fou- 
tus de faire une protection efficace 
contre les jeunes amateurs qui 
font mumuse avec leur grosse 
machine. 

Ici, on ose interdire des salons 
informatiques au moins de 18 ans. 
Sans raison, pour le plaisjr de 
prouver, encore une fois, que la 
liberie se resume pour beaucoup 
a trois syllabes creuses. 
Et croyez-moi, c'est difficile de 
continuer a vous defendre, mes 
petits pirates cheris, parce 
qu'aujourd'hui j'en ai gros sur la 
patate : une bande d'enfoires de 
jeunes pirates de merde a plante 
la section PI du serveur Hebdo I 
II faudra 10 jours pour reparer I 



Gerard Ceccaldi 
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Vous etes MAX, I'explorateur bien connu. Sur une carte, que 
vous avez denichee Dieu sait ou, figure au Nord-Est du 
TENERE, une grotte mysterieuse qui excite votre convoi- 
tise. A travers un long voyage dans le desert, vous devrez 
decouvrir le code et la phrase magique qui vous permet- 
tront d'atteindre votre but... 

Michel CHEVALIER 

Mode d'emploi : 

Tapez et sauvegardez a la suite ces deux programmes. Les regies son) 

incluses dans la presentation. 
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LISTING 1 



10 BORDER 0: PAPER 0: INK 8: C 
L5 : PRINT FLASH 1;RT 10,4;"flRRE 
TEZ LE MAGNETOPHONE": FOR I»l TO 
200: BEEP .01,50: NEXT I 

20 GO SUB 9000 

30 PRINT AT 10,*; " 

60 PRINT RT 81,0; "QUELQUES REN 
SEIGNEMENTS ? iO/N)": GO SUB 600 


60 IF = -l THEN GO TO 9190 

100 CLS : INK 6: PLOT 0,56: DRfl 
U 4.3,0: PLOT 58,56: DRRU 197,0 

101 GO SUB 1000 
104 INK 2 

106 FOR I«0 TO 3 STEP . 1 

110 PLOT 239,56: DRRU -48,0,1 

120 NEXT I 

130 FOR I«0 TO 40 STEP 8 

14.0 PLOT 215,56: DRRU 40,1 

150 NEXT I 

160 PLOT 215,56: DRRU 40,56 

170 FOR I«3»PI/8 TO PI STEP PI/ 
8 

180 PLOT 215,56: DRRU 80*COS I, 
80«SIN I 

190 NEXT I 

200 FOR d»7*PI/16 TO 15*PI/16 S 
TEP PI/8 

210 PLOT 215,56: DRRU 60*COS J, 
60*SIN U 

220 NEXT J 

24.8 LET PP-0 

250 FOR I«30 TO 14 STEP -1 

255 IF PP/2»INT (PP/2) THEN LET 

A»»"D ": GO TO 260 

258 LET fl« = "E " 

260 PRINT INK 7;RT 15,UR» 

270 BEEP .01,30: PRUSE 30 

275 LET pp«pp + l 

230 NEXT I 

300 FOR 1=70 TO 190 STEP 24 

310 PLOT OUER 1; INK 8; 114,55: 
DRRU OUER 1; INK 8; 1-114, 105: BE 
EP .01,40: PLOT OUER 1; INK Sill 
4,55: DRRU OUER 1; INK 8; 1-114,1 
05 

315 GO SUB 300+1 

320 NEXT I 

330 GO SUB 8000 

369 GO TO 2000 

370 INK 3: PLOT 70,152: DRRU 0, 
12: DRRU -6,0: DRRU 0,4: DRRU 16 
,0: DRRU 0,-4: DRRU -6,0: DRRU 
,-12: DRRU -4,0: RETURN 

334 PLOT 88,153: DRRU 0,18: DRfi 
U 16,0: DRRU 0,-3: DRRU -10,0: D 
RRU 0,-4.: DRRU 5,0: DRRU 0,-3: D 
RRU -5,13: DRRU 0,-3: DRRU 10,0: 
DRRU 0,-3: DRRU -16,0: RETURN 

418 PLOT 112,152: DRRU 0,16: DR 
RU 5,0: DRRU 8,-12: DRRU 0,12: D 
RRU 3,0: DRRU 0,-16: DRRU -5,0: 
DRRU -6,12: DRRU 0,-12: DRRU -3, 
0: RETURN 

442 PLOT 136,152: DRRU 0,16: DR 
RU 16,0: DRRU 0,-3: DRRU -10,0: 
DRRU 0,-4: DRRU 5,0: DRRU 0,-3: 
DRRU -5,0: DRRU 0,-3: DRRU 10,0: 

DRRU 0,-3: DRRU -16,0: RETURN 

466 PLOT 160,152: DRRU 0,16: DR 
RU 14,0: DRRU 0,-9: DRRU -4,0: D 
RRU 4. , -7 : DRRU -4,0: DRRU -3,7: 
DRRU -4,0: DRRU 0,-7: DRRU -3,0 

467 PLOT 163,162: DRRU 0,3: DRfi 
U 6,0: DRRU 0,-3: DRRU -8,0: RET 
URN 

490 PLOT 184,152: DRRU 0,16: DR 
RU 16,0: DRRU 0,-3: DRRU -10,0: 
DRRU 0,-4: DRRU 5,0: DRRU 0,-3: 
DRRU -5,0: DRRU 0,-3: DRRU 10,0: 

DRRU 0,-3: DRRU -16,0: RETURN 

999 STOP 
1000 INK 4 

1010 PLOT 24,6: DRRU 31, 112, PI/6 
1015 PLOT 39,6: DRRU 18, 112, PI/6 
1020 PLOT 56,120: DRRU 10 , -34 , -P 
1/8: DRRU -10,34, -PI/6 
1025 DRRU 24, -54, -PI/6: DRRU -24 
,54, PI/2. 8 

1030 DRRU 40, -42, -PI/4: DRRU -40 
,42,PI/2 

1035 DRRU 40,0, -PI/8: DRRU -40,0 
, PI/2. 5 

1040 DRRU 3, 15, PI/3: DRRU -3,-15 
,PI/3 

1045 DRRU -35, 8, PI/1. 5: DRRU 38, 
-8, -PI/3 

1050 DRRU '-46, -32, PI/1. 8: DRRU 4 
6,32, -PI/4 

1055 DRRU -24, -44, PI/1. 8: DRRU 2 
4,44, -PI/4 ' 

1060 PLOT 40,8: DRRU 18, 19, -PI/4 
: DRRU -12, -19, PI/4 
1065 DRRU 12, 6, -PI/4: DRRU -8,-6 
,PI/4 

1070 PLOT 23,6: DRRU -16, 16, PI/4 
: DRRU 12, -16, -PI/4 
1075 DRRU -12, 6, PI/4: DRRU 6,-6, 
-PI/4 

1080 PRINT RT 16,1; "R"; AT 20,12; 
"R";RT 16,19; "R";RT 19,20; "R";RT 

17,24; "R";RT 16,27; "R";RT 20,26 
; "R" 

1100 INK 5: PLOT 119,16: DRRU -4 
0,0: DRRU -11,5, -PI/3: DRRU 11,6 
,-PI/3 

1110 DRRU 12, 6, PI/3: DRRU -20,4, 
-PI/6: DRRU 3,4, -PI/6 
1116 DRRU 16,6, -PI/6: DRRU 48,0 
1120 DRRU 0,-6, -PI/2: DRRU -6,-5 
1125 DRRU 0,-6, PI/2: DRRU 13,-3 
1130 DRRU 0,-3, -PI/2 
1140 DRRU -28, -7, -PI/6 
1150 PLOT 82,22: DRRU 8,0: PLOT 
112,22: DRRU 8,0: PLOT 128,22: D 
RRU 8,0: PLOT 96,28: DRRU 6,0: P 
LOT 115,28: DRRU 8,0: PLOT 68,36 
: DRRU 6,0: PLOT 103,36: DRRU 8, 
0: PLOT 120,36: DRRU 8,0: PLOT 9 
6,42: DRRU 6,0: PLOT 112,42: DRR 
U 8,0 

1200 RETURN 

2100 LET a •■"UOUS ETES MAX L ' EXP 
LORRTEUR,ET UOUS flUEZ ENTENDU PR 
RLER D'UNE GROTTE MYSTERIEUSE SI 
TUEE RU NORD-EST DU TENERE. UOUS 



RUEZ DENICHE UN PLRN SUR LEUUCL 
ELLE EST REPEREE.UOUS ETES EQUIP 
E RU DEPART D'UN CHRMERU.DE 5 dE 
RRICRNS DE 20 LITRES O'EAU ET 90 

K ,?_£E RRUITRILLEMENT. LE DESERT 

N'ETRNT PRS TOUdOURS BIEN FREOU 
ENTE,UOUS N'EMPORTEZ SUP UOUS OU 
E 1000 FRRNCS,MRIS UOUS POSSEDEZ 

40000 FRRNCS SUR UN COMPTE BfiNC 
AIRE. UOUS RUEZ EUflLUE UOTRE CONS 
OMMRTION,EN TEMPS NORMRL R 2 LIT 
RES D'ERU ET 1,5 KO DE RRUITRILL 
EMENT PRR dOUR.DANS LES ERGS OU 
REGS.R 4 LITRES D'ERU ET 3 KG DE 

RRUITRILLEMENT PRR JOUR." 
2120 LET S«10 
2122 FOR 5-1 TO LEN Rt+33 
2124 PRINT INK 6;RT 21,0; (" 

"+A* + 

") (B TO B+31) 

2126 FOR R»l TO S: NEXT R 

2127 BEEP .005,30 

2128 NEXT B 

2140 LET B««"ON UOUS R FORTEMENT 
CONSEILLE DE COMMENCER PRR FRIR 
E FORTUNE, LE DESERT ETRNT PLEIN 
DE RICME3SES INSOUPCONNEES. " 
2145 LET S»10 
2147 FOR B»l TO LEN B*+33 
2150 PRINT INK 6; RT 21,0; I" 

"+B* + 

■') (B TO B+31) 
2153 FOR R«l TO S: NEXT fl 
2157 BEEP .005,30 
2160 NEXT B 

2500 PRINT RT 21 , 0; 'ENCORE UNE F 
OIS ? (0/N) ": GO SUB 60 

00 

2510 IF 0«1 THEN GO TO 2100 
3000 PRINT INK 6;RT 4,18;"M0UUEM 
ENTS";RT 5,12;"DE MAX";AT 7,12;" 
N : GRUCHE";RT 8,12; "M : DROITE" 
;RT 9,12; "R : DESCEND" ; RT 10,12; 
"0 : MONTE" 

3004 PRINT RT 21,0;" 

3005 GO SUB 6500 

3010 PRINT RT 21,0; INK 7;"Pr*SS 
ez,"; INK 8;"0"; i INK 7;" pour CO 

3050 IF INKEY* = "0" THEN GO TO 35 

00 

3060 GO TO 3050 

3500 PRINT ;AT 4,12;" 

;AT 5,12;" ";RT 7,12; _ 

"; AT 8,18; " ;,RT 9 

,12;" ";RT 10,18;" 

111% l*eV T 8.I'17!nkey.."o",-<inkey 
•s"n"> 

6080 IF o»0 THEN GO TO 6010 

6030 RETURN 

6000 REM MUSIOUE 

6010 LET fi.,3 

8020 BEEP A, 4: BEEP R,9: BEEP A, 

4: BEEP A, 9: BEEP A.ll: BEEP R/S 

,18: BEEP A, 11: BEEP A, 11: BEEP 

R,4: BEEP A, 9: BEEP A, 4: BEEP A, 

9 

6030 BEEP A, 11: BEEP A/8, 18: BEE 

P 2*A,9: BEEP A, 4: BEEP A, 9: BEE 

P A, 4: BEEP A, 9: BEEP A,ll: BEEP 

A/2.12: BEEP A, 11: BEEP A, 11: B 
EEP A, 4: BEEP A, 9: BEEP A, 4: BEE 
P R,9 

8040 BEEP A.ll: BEEP R/2,12: BEE 
P 2*fl,9: BEEP A, 12: BEEP A, 11: B 
EEP A, 9: BEEP A, 11: BEEP A, 4: BE 
EP A, 9: BEEP A , 4 : BEEP B,9: BEEP 

A, 11: BEEP A/2,12: BEEP 2*R,9 
8050 RETURN 

8501 RESTORE 9180: LET a*. 2 
8503 FOR i«l TO 36 
8505 RERD b,S: BEEP b,S 
8510 NEXT i 
8600 RETURN 

9000 LET C»BIN 00010000 

9001 LET e=BIN 00000001: LET f »B 
IN 10000000 

9002 RESTORE 

9005 FOR i»USR "a" TO USR "U"+? 
9010 READ U: POKE i ,u : NEXT i 
9020 DRTR BIN 00011000, BIN 00100 
100, BIN 01000010.BIN 11000011,81 
N 01000010.BIN 01000010, BIN 0100 
0010, BIN 01111110 

9030 DRTR 0. BIN 00000010, BIN 001 
00111, BIN 01110100, BIN 11111100, 
BIN 01001000, BIN 01001000, BIN 01 

001000 

9040 DRTR BIN 00001001, BIN 01011 
101, BIN 10101011, BIN 10111100,61 
N 01001000.BIN 00010100, BIN 0001 

0010.BIN 00110110 _ „„ 

9050 DRTR BIN 00010100, BIN 01001 
100, BIN 11100100, BIN 00101110,BI 
N 00111111, BIN 00010010, BIN 0001 

001O.BIN 00010010 

9060 DRTR 0,BIN 00000100, BIN 010 
11100, BIN 11100100, BIN 00101110, 
BIN 00111111, BIN 00100010, BIN 01 
000001 

9070 DRTR 0,0, 0,0, BIN 00011000,6 
IN 00100100, BIN 01000010, BIN 100 
00001 

9080 DRTR 0,0,0, BIN 01000000, BIN 
00100100, BIN 00010111, 255, BIN 
0000100 

9090 DRTR BIN 00111000,BIN 01111 
100, BIN 00111010, BIN 10010010, BI 
N Silllll0,BIN 00111010, BIN 0010 
1010, BIN 01101110 mmmmm , mm « 

9095 DRTR 0,0, 0,0, BIN 00000100,2 
55, 265, BIN 00000100 

9096 DRTR ,0 , , 0,0, BIN 11110000 
,256, BIN 00001000 

9097 DRTR BIN 00101000, BIN 00110 
010, BIN 00100111, BIN 01110100,61 
N 11.111100, BIN 01001000, BIN 0100 
1000, BIN 01001000 

9098 DRTR BIN 00100000, BIN 01010 
000, BIN 11011000, BIN 01010000,61 
N 00000100, BIN 00001010, BIN 0001 
1011, BIN 00001010 

9099 DRTR 0,BIN 01100000.BIN 111 
10000, 6IN 11110000, BIN 01111110, 
BIN 00111101, BIN 00100100, BIN 00 
100100 

9100 DRTR 0,0, BIN 00111110, BIN 
1000001, BIN 10001111, BIN 0001001 
1,BIN 00100101, BIN 01001001 

9101 DRTR 0,0, BIN 01111100, BIN 1 



0000010, BIN 11110001, BIN 1100100 
0,BIN 10100100, BIN 10010010 

9102 DRTR E,E,E,E,E,BIN 00000111 
,BIN 01111111,0 

9103 DRTR F,F,F,F,F,BIN 11100000 
,BIN 11111110,0 

9104 DRTR BIN O0101001, BIN 10101 
010, BIN 01100101, BIN 00100110,61 
N 00010100, BIN 11001011, BIN 0010 
1100, BIN 00011000 

9105 DRTR 0,0, BIN 01101100, BIN 
1101101, BIN 00110110, BIN 101001O 
1,6IN 01111110, BIN 00111100 

9106 DRTR 0,BIN 00100000, BIN 001 
11010, BIN 00100111, BIN 01110100, 
BIN 11111100, BIN 01000100, BIN 10 
000010 

9110 DRTR BIN 00011000, BIN 00011 
000, BIN 01111110, BIN 01111110.61 
N 00011000, BIN 00011000, BIN 0001 
1000, BIN 00011000 
9150 RETURN 

9180 DRTR a, 7, a /8, 7, a /2, 7, a, 7, a, 
ll,a,7,a,li,a*a,9,a,9,a/8,ll,a/8 
,12, a, 14, a, 14, a, 14, a, 11, a, 7 
9131 DRTR a/2, 7, a/8, 9, a, 11, a , 11, 
a , 11, a /2, 9, a /8, 7, a ,9,a/8,9,a/8, l 
l, a, 9, a/2, 7, a /a, s,l. 5 *a, 11, a/8. l 
1, a, 11, a, 14, a, 11, a, 9, 2*a, 7 

9190 PRINT INK 7; FLASH 1;RT 4,1 
2; "REMETTEZ LE";AT 5,12;" 

";AT 6, 12; "MAGNETOPHONE"; A 
T 7,12; " ";RT 8,12; '' 

EN ROUTE " 

9191 PRINT RT 21,0; " 

9198 FOR 1*1 TO 200: BEEP .01.40 
: NEXT I: FOR I«4 TO 8: PRINT AT 
1,12; " " : NEXT I 

9195 PRINT AT 2,0; "" 

9196 INK 

9200 LOAD "TENERE" 



LISTING 2 



> 



25 LET te=0: LET t .0 : LET 0=0: 
LET f«0: LET v=100: LET cb«4000 
0: LET n*1000: LET 0=0 

28 BORDER 0: PRPER 6: INK 0: C 
LS : LET fus«0: LET bOU«0: LET n 
j«5: LET S>90: LET pel =0. LET Pi 
0=0 

70 GO SUB 6600 
75 GO SUB 1500 

39 RESTORE 9200: DIM q<5>: DIM 

r (5) : INK 0: DIM H(5): DIM U (5) 

: DIM E(5>: DIM F(5): DIM at. 12): 

DIM b*C8>: DIM CI1S) : DIM d*(8) 

98 FOR d»l TO 8 

93 RERD a*CJ),b*<j),C*<J>,d*(j 

94 IF j"l THEN LET f9»5 

95 IF J=8 THEN LET rg«3 
100 FOR 1 = 1 TO FG 

110 LET UCD'INT <RND#17>+4: LE 
T h(i)»INT IRND+29) +8 
131 IF SCREEN* (V (i ) , h (i ) ) <>" 
THEN GO TO 110 

138 IF SCREEN* (V ( i ) +1 ,h (i ) ) <>" 
" THEN GO TO 110 

133 IF SCREEN* (V ( i ) ,h ( I ) +1) <> " 
" THEN GO TO 110 

134 IF SCREEN* (V ( i ) +1 ,h (i ) +1) < 
>" " THEN GO TO 110 

135 IF j = l THEN GO TO 170 

136 IF i«5 THEN INK 7: GO TO 14 


137 INK i-1 

140 LET qii)"V(i): LET r(i)«h(i 
) : GO SUB 1700 

150 NEXT i 

160 NEXT J 

165 GO TO 300 

170 LET *<i)«h(i): LET I ( i ) =v ( i 
) : GO TO 136 

300 DIM K«(4,18): DIM H«(5,18) 

301 FOR J»l TO 4 

303 FOR I«l TO 5: READ Mill): N 
EXT I 

309 LET KA-INT (RND*5)+1: LET K 
dJ' «H*(Kfl> 

315 NEXT d 

350 DIM U(4) 

353 FOR 1=1 TO 4: LET U(I)=INT 
iRND*9)+l: NEXT I 

360 LET COde=w (1) *1OO0+W (2) »10O 
+'ii (3) *10+w (4) 

1000 LET U=0: LET NCH=1: LET UC« 
8: LET GH»1: LET RL=0: LET PP«0: 

LET X = l; LET Y=20: LET S*="K": 
INK 0: GO SUB 8300: GO SUB 6500: 

GO SUB 8500 
1015 GO SUB 9040: GO SUB 9030: G 
SUB 8300 

1020 LET Z«X; LET X =x + < INKEY* = "I» 
" AND X<=30> -<INKEY*="n" RND X> = 
0) 

1030 LET y«y + (INKEY«."a" RND y< = 
20) -<INKEY««"q" RND y>4> 
1035 GO TO 2000 

1040 LET ER»1: GO SUB 8420: IF 
•-1 THEN GO TO 8200 

1043 IF Z>X THEN LET U»l: GO TO 

1044 LET U»0 

1045 GO SUB 8070 

£2£ 6 k? T - t ** t « +1: 60 SUB 8300: B 
EEP .01,5: LET PP.pp+i 

J-212 , I C h " 8 ™EN GO TO 1060 
3-gfS LET gh.INT (RND»10) 
1057 IF gh<>0 THEN GO TO 14O0 
1060 IF a i. =28 THEN LET a I =0 : LET 
VOINT (RND*18)+7: LET «h = l: 00 
TO 1100 

1066 GO SUB 6080 

1067 IF VC=y RND a'.+3-x THEN GO 
SUB 1900 

1063 IF vc=y RND aL«X THEN GO SU 
B 1900 

1069 IF vc.u RND a 1 4 lax THEN GO 
SUB 1900 

1070 IF vc.u RND al+8>x THEN GO 
SUB 1900 

1078 FOR 1=1 TO 3: NEXT I: GO SU 
B 8080: LET AL=AL+1 GO TO 1401 

1400 GO SUB 9010 

1401 GO TO 1013 
1500 FOR i>4 TO 81 

1510 LET fl»INT (RND*4)+14: LET 
kl=INT (RND*5) +20 
1515 FOR j«ri TO Kl 



1520 PRINT BRIGHT 1;RT i,j;"F" 
1585 NEXT j 
1530 NEXT i 

1550 FOR i «6 TO 18 STEP 6 
1600 PRINT BRIGHT 1; INK INT (RN 
D*8) +l;RT i ,18; "0" 
1610 NEXT i 
1680 RETURN 

1700 PRINT PRPER ij+3);RT qu),r 
(i);a*U);RT q. (i ) , r ii ) +1; b* ( j) ; fl 
T qii) +l,r ii) ; c*(j) ;RT q(i)+l,r( 
i) +l;d«(j) : RETURN 
1300 print RT 19,1; "Cela vous co 
utt ";r;" F";RT 21,l;"Il vous r« 
ste ";»; " F" ■. return 
1902 print RT 0,0; "rtncontr* avt 
C une caravans": GO SUB 9020: GO 

SUB 9040 
1905 PRINT RT 0,0; "Le Ch* f dit q 

ut it 4t chifrr* du codt stcrat 

est " ;wi4>- GO SUB 9020 

1910 GO SUB 9040: GO SUB 8500: G 

SUB 8300: LET y=y-l: GO SUB 83 

00: RETURN 

2000 IF SCREEN* <y,X>»"X" THEN B 

EEP .05,30: LET y=y + l: LET X-X-l 

2002 IF RTTR (y,X)»147 THEN GO T 
6000 

2003 IF SCREEN* <y,X)«"." THEN G 
TO 2100 

2005 IF RTTR (y,x)»40 THEN LET n 

U.l: GO TO 2500 

8006 IF RTTR ly,x)»41 THEN LET n 
U»2: GO TO 2600 

8007 IF RTTR ty,X)=42 THEN LET n 
U>3: GO TO 2500 

8010 IF RTTR (y,X)«112 THEN GO T 
4000 

8020 IF RTTR (y,X)«38 THEN GO TO 
3000 

8021 IF RTTR (y,x)»33 THEN GO TO 
3500 

8022 IF RTTR (y,X)=34 THEN GO TO 
5500 

2023 IF ATTR (y,x)«36 THEN GO TO 

4300 
8024 IF RTTR ly,X)«39 THEN GO TO 

4300 
2025 IF RTTR (Y,X)=113 THEN GO T 
O 4700 

8086 IF RTTR (Y,X)«114 THEN GO T 
O 4800 

2028 IF 0«-l THEN GO TO 8200 
2030 GO TO 1040 

2105 PRINT RT 0,0; "UOUS ETES DAN 
S LE REG": LET ea«2: GO SUB 8420 
: IF 0»-l THEN GO TO 6800 

8180 GO TO 1046 

8508 LET te»te+8: BEEP .3,7: BEE 

P .05,80: BEEP .1,10: GO SUB 850 

5 

2503 PRINT RT 0,0; "UOUS ETES DRN 

S UN UILLRGE": GO TO 8555 

8510 INK 0: PAPER 6: CLS : PRINT 

RT 8,18; "R "; PARBR 0;" ; 
PAPERS;" "; PAPER 4; " »««»««» 

8513 PRINT RT 3,16; PAPER 0i"_"; 

ink a;"*"; ink 0;" •■; paper 5; 

INK 0; " "1 PRPER 4; "« 8 
8517 PRINT AT 4,14; "A "i PAPER 
.. ... pfiPE p B; •• H "; PAPER 4; 

BBBB tt" 
2580 PRINT RT 5,4; "NO 

"; PAPER 4;" BBBB «" 
2522 PRINT RT 6,4; "PO R 

•• : PRPER 4; "» »" 
2524 PRINT RT 7,0; PAPER 2; "8t»a» 
"; PAPER 5; " A 

; paper 4,-aaaaaaaa" _ „.,._ 

8526 PRINT RT 8,0; PRPER 8; aCC 

C"; PRPER 5;" A" _„__ . „„__ 

2528 PRINT RT 9,0; PRPER 8; aCC 

"; PAPER 5; " NO 

, paper 7;-aaaaaaaa" ,.„«-- 

8530 PRINT RT 10,0; PAPER 8, 8CC 
fl"; PRPER 5; " _P0 M 

" ; PRPER 7: " a' 

8538 PRINT RT 11,0; PRPER 8;"aaa 

a"; PRPER 5; " R 

" ; PRPER 7; " .... a" 

8534 PRINT RT 18,0; "S"; AT 18,83; 

PRPER 7; "a 8" 

2536 PRINT RT 13,0; "U R R 

"; paper 7;"aaaaaaaa" 

8538 PRINT RT 14,0; "I R NO" 

2S40 PRINT RT 15,0; "C> "; PAPER 

l; BRIGHT 1;" "; PRPER 5; BRIGHT 

0; " PO R "; PAPER 

3; "aaaaaaaaa" 

2548 PRINT RT 16,0; "I"; AT 16,83; 

PAPER 3; "8 8" 
8544 PRINT RT 17,0;"D R fl fl 
"; PAPER 3; "8 "; PR 
PER 0; " "; PRPER 3; " 8" 
8546 PRINT RT 18,0; "ER fl" ; RT 18, 
83; PRPER 3; " R 8" 
8548 PRINT RT 19,83; PAPER 3; "8 
"; PAPER 0;" "; PAPER 3;" 8" 

8550 PRINT RT 80,8; "R fl"; PRPE 
R 1;" "; PRPER 6; "R R 

"; PAPER 3; "8 8" 

8551 PRINT RT 81,0; INK 8i"DESER 
T>"; PRPER 1; INK 0;" "; PRPER 6 
; " "; PAPER 1; " ", PAPER 5; " 

"; PRPER 3; "888888888": 
CIRCLE 27,51,8: RETURN 
8555 LET U>0: GO SUB 6050: GO SU 
B 3560: GO SUB 9040 
8570 IF 0»-l THEN GO TO 3600 
2580 GO SUB 8400 

2596 LET e»C: LET C-C + (INKEY«-"I» 
" RND C<=30) -tINKEY*«"n" RND C>« 
0) 

2599 LET d »d + ( INKEY* = "a " RND do 
80) -(INKEY*«"q" RND d>>3) 
2603 IF RTTR (d , C) «24 THEN GO SU 
B 7500 

8604 IF RTTR (d,C)»0 THEN GO SUB 
9700 

8605 IF RTTR (d,C)»6 THEN GO SUB 
8560 

8606 IF RTTR (d,C)«48 THEN GO TO 
2993 

2607 IF SCREEN* (d , C) ■"8" THEN L 



ET d»9: LET c»15: PRINT RT l,w, 
II raut passer par La port*": GO 

SUB 9000: GO SUB 9040 
2606 IF RTTR ld,c)«32 THEN GO SU 
B 9800 



Suite page 9 



TRON 



CQMWe 0N PAT ro/M 
tiTiOM $B MOVCHE 
D/W£ s# W2AP5/ 



Vivez a deux adversaires resolus, une aventure eprouvante 
qui laisse des traces... 

Yann CHRISTIEN 

Mode d'emploi : 

Entrez le listing par CALL- 151 et verifier la perfection de votre travail par 

HEX-CHECK (cf. HHHEBDO N°78). Sauvegardez par : 

BSAVE TRON, A$800, L$EF0 

Se joue en principe a deux, a I'aide des touches suivantes (QWERTY) : 

- Adversaire de gauche : touches "E" (haut), "X" (bas), "S" (gauche) et 
"D" (droite). 

- Adversaire de droite : touches "I" (haut), "M" (bas), "J" (gauche) et "K" 
(droite). 




0800- 


A9 09 8D 


17 03 A9 ID 


8D 


(♦00) 


0AF0- 


37 60 20 6C OC AD 00 03 


(♦B9) 


ODEO- 


3A F5 A2 00 A9 00 AO BF 


(♦DB) 


10D0- 


3F 


3F 


3F 


3F 


3F 


3F 


3F 


3F 


(♦00) 


0808- 


18 03 A9 


OF 8D 19 03 


A9 


(♦83) 


0AF8- 


8D OD 03 AD 02 03 8D OE 


(♦AC) 


0DE8- 


20 3A F5 A2 00 A9 00 AO 


(♦44) 


10D8- 


3F 


3F 


3F 


3F 


3F 


3F 


3F 


3F 


(♦00) 


0810- 


OF 8D 20 


03 A9 01 8D 


E7 


(♦63) 


0B00- 


03 AD 08 03 8D F9 00 20 


(♦Fl) 


ODFO- 


1A 20 3A F5 A2 01 A9 08 


(♦F7) 


10E0- 


3F 


3F 


3F 


37 


36 


36 


36 


36 


(♦08) 


0818- 


00 EA A9 


00 8D OF 03 


8D 


(♦4F) 


0B08- 


75 OD 20 19 OD EE 10 03 


(♦Bl) 


0DF8- 


AO 1A 20 3A F5 A2 01 A9 


(♦5F) 


10E8- 


2E 


2D 


20 


20 


20 


2D 


20 


20 


(♦03) 


0820- 


10 03 20 


BF 0D A2 00 


BD 


(♦9E) 


0B10- 


AD 10 03 C9 OA FO 47 20 


(♦EA) 


OEOO- 


08 AO BE 20 3A F5 A2 00 


(♦5B) 


10F0- 


2D 


2D 


2D 


2D 


20 


2D 


70 


20 


(♦00) 


0828- 


00 40 9D 


00 20 E8 DO 


F7 


(♦32) 


0B18- 


19 OD A9 40 85 E6 20 19 


(♦A7) 


0E08- 


A9 01 AO BE 20 3A F5 A2 


(♦FB) 


10F3- 


2D 


2D 


2D 


2D 


20 


2D 


2D 


20 


(♦00) 


0830- 


EE 29 08 


EE 2C 08 AD 


29 


(♦81) 


0B20- 


OD A9 20 85 E6 4C 25 08 


(♦86) 


0E1O- 


00 A9 01 AO 1A 20 3A F5 


(♦FD) 


1100- 


2D 


2D 


2D 


2D 


20 


2D 


2D 


00 


(♦2D) 


0838- 


08 C9 60 


DO EA A9 40 


8D 


(♦FF) 


0B28- 


20 6C OC AD 01 03 8D OD 


(♦6F) 


0E18- 


A9 00 8D F9 00 8D OD 03 


(♦5E) 


1108- 


24 


24 


24 


2D 


2D 


36 


36 


36 


(♦12) 


0840- 


29 08 A9 


20 8D 2C 08 


A9 


(♦A8) 


0B30- 


03 AD 03 03 8D OE 03 AD 


(♦83) 


0E20- 


A9 01 8D OE 03 A9 ID 8D 


(♦11) 


1110- 


3F 


27 


2C 


28 


28 


00 


25 


27 


(♦36) 


0848- 


40 85 E6 


20 19 OD A9 


20 


(♦9E) 


0B38- 


09 03 8D F9 00 20 75 OD 


(♦26) 


0E28- 


OA 03 20 51 OD 20 01 OD 


(♦59) 


1118- 


25 


27 


24 


04 


00 


25 


27 


25 


(♦05) 


0850- 


85 E6 A9 


00 8D 10 CO 


8D 


(♦1A) 


0B40- 


20 19 OD EE OF 03 AD OF 


(♦74) 


0E30- 


A9 D2 8D OD 03 20 01 OD 


(♦D4) 


1120- 


6F 


2D 


25 


24 


3F 


3F 


B7 


92 


<i66) 


0858- 


06 03 8D 


07 03 8D 14 


03 


(♦16) 


0B48- 


03 C9 OA FO 11 20 19 OD 


(♦15) 


0E38- 


A9 33 8D OD 03 A9 07 8D 


(♦3A) 


1128- 


4A 


2D 


2D 


00 


2D 


2D 


25 


27 


(♦48) 


0860- 


A9 FE 8D 


05 03 A9 02 


8D 


(♦FA) 


0B50- 


A9 40 85 E6 20 19 OD A9 


(♦17) 


0E40- 


OE 03 A9 OD 8D OA 03 20 


(♦OD) 


1130- 


25 


3F 


2F 


48 


24 


3F 


3F 


07 


(♦5E) 


0868- 


04 03 A9 


69 8D 02 03 


8D 


(♦C6) 


0B58- 


20 85 E6 4C 25 08 AD OF 


(♦80) 


0E48- 


51 OD 20 01 OD A9 15 8D 


(♦41) 


1138- 


00 


4? 


25 


27 


20 


47 


23 


24 


(♦26) 


0870- 


03 03 A9 


19 8D 00 03 


A9 


(♦97) 


0B60- 


03 C9 OA FO 08 A9 OB 8D 


(♦17) 


0E50- 


OD 03 A9 13 8D OE 03 A9 


(♦9D) 


1140- 


DF 


33 


36 


2E 


2D 


00 


74 


2D 


(♦80) 


0878- 


F3 8D 01 


03 A9 14 8D 


08 


(♦44) 


0B68- 


OF 03 4C 72 OB A9 OB 8D 


(♦16) 


0E58- 


OC 8D OA 03 20 51 OD 20 


(♦D4) 


1148- 


25 


27 


25 


3F 


3F 


24 


2C 


20 


(♦02) 


0880- 


03 A9 32 


8D 09 03 A9 


01 


(♦B7) 


0B70- 


10 03 20 19 OD A9 64 8D 


(♦67) 


0E60- 


01 OD A9 E8 8D OD 03 20 


(♦EE) 


1150- 


2D 


00 


2D 


2D 


25 


24 


3F 


3F 


(♦2C) 


0888- 


8D E7 00 


2C 50 CO 2C 


57 


(♦AD) 


0B78- 


OD 03 A9 5F 8D OE 03 A9 


(♦Dl) 


0E68- 


01 OD A9 5E 8D OD 03 A9 


(♦Dl) 


1158- 


36 


27 


24 


24 


2D 


2D 


35 


06 


(♦22) 


0890- 


CO 2C 54 


CO A9 70 8D 


OD 


(♦21) 


0B80- 


18 8D OA 03 20 51 OD 20 


(♦CO) 


0E70- 


15 8D OE 03 A9 19 8D OA 


(♦A2) 


1160- 


00 


2? 


3C 


2C 


64 


OC 


3C 


3F 


(♦52) 


0898- 


03 A9 5F 


8D OE 03 A9 


00 


(♦DC) 


0B88- 


9C OD 20 01 OD A9 OB 8D 


(♦92) 


0E78- 


03 20 51 OD 20 01 OD A9 


(♦FA) 


1168- 


37 


06 


00 


2D 


2D 


24 


3C 


3F 


(♦16) 


08A0- 


8D F9 00 


A9 OA 8D OA 


03 


(♦53) 


0B90- 


OA 03 20 51 OD 20 01 OD 


(♦59) 


OE80- 


6C 8D OD 03 A9 1A 8D OA 


(♦DB) 


1170- 


36 


27 


24 


24 


2D 


2D 


36 


06 


(♦21) 


08AB- 


20 51 0D 


20 01 OD AD 


00 


(♦FD) 


0B98- 


A9 00 8D OF 03 8D 10 03 


(♦B6) 


0E88- 


03 20 51 OD 20 01 OD A9 


(♦FA) 


1178- 


00 


30 


2D 


2D 


3C 


2C 


3C 


3F 


(♦23) 


08B0- 


CO C9 80 


90 F9 20 01 


OD 


[♦CO 


0BA0- 


A9 40 85 E6 20 19 OD A9 


(♦17) 


0E90- 


8F 8D OD 03 A9 IB 8D OA 


(♦39) 


1180- 


27 


24 


2D 


2D 


36 


06 


00 


25 


(♦16) 


08B8- 
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F4 AD 09 03 


8D 


(♦EC) 


0DB0- 


20 01 F6 60 A2 FF AO FF 


(♦B5) 


10A0- 


36 36 36 25 24 28 6D 40 


(♦32) 


1390- 


2D 


25 


3F 


27 


2D 


25 


3F 


FF 


(♦D8) 


0AC8- 


F9 00 AE 


17 03 AC 19 


03 


(♦F5) 


0DB8- 


88 DO FD CA DO F8 60 20 


(♦07) 


10A8- 


3B 3F BF 92 52 29 2D OD 


(♦72) 


1398- 


DB 


43 


6B 


OD 


OD 


OD 


45 


FB 


(♦40) 


0AD0- 


AD 1^9 00 


20 5D F6 AE 


18 


(♦69) 


0DC0- 


D8 F3 A2 03 20 FO F6 AO 


(♦OO 


10B0- 


24 24 24 2D 2D 35 36 3F 


(♦18) 


13A0- 


IF 


IF 


IF 


47 


6B 


OD 


OD 


OD 


(♦3E) 


0AD8- 


03 AC 20 


03 AD F9 00 


20 


(♦F8) 


0DC8- 


00 A2 00 A9 19 20 57 F4 


(♦91) 


10B8- 


3F 36 26 48 71 B6 2D 24 


(♦A9) 


13A8- 


45 


FB 


IF 


IF 


IF 


47 


66 


OD 


(♦80) 


0AE0- 


01 F6 60 


AD 15 03 C9 


22 


(♦C7) 


0DD0- 


A2 01 A9 09 AO 19 20 3A 


(♦AO) 


10C0- 


24 24 24 24 3F 3F 3F 3F 


(♦00) 






















0AE8- 


DO 08 AD 


16 03 C9 22, 


DO 


(♦5B) 


0DD8- 


F5 A2 01 A9 09 AO BF 20 


(♦C9) 


10C8- 


3F 3F 3F 3F 3F 3F 3F 3F 


(♦00) 


Suite page 


8 

















PIN BALL 



Je te supplie,6 dieu Informatique aux mille pouvoirs, de faire 
en sorte que la magie de ce programme miraculeux, trans- 
forme mon pauvre EXEL en un superbe flipper... 



EXELVISION EXL 100 

'QBP! T'AS PAS D»X #k7?"\ 
Ya pL"$ &£H A W££ MM} 




j>EflT PAS te nompbe 
-ftVUfi 




tA u&me.-iE 



Daniel COCHAUX 



SUITE DU N° 130 




i>'< 



1,0 



2607 DATA A46782B203253101EBCC4337C506222B3642161B33A8E808566CA432AB5365672A73F6 

2608 DATA AA8ABCAA3CC4AAA2CEAA4AE1F4AA38AB6C40CCB26A8FA2061 1F58A1 CF2203822436EC8 
2603 DATA B014AB5237A1884422DA3CA6A242AAC86458CA4121 A3324AABA64433AA2A6D1 A75572C 

2610 DATA 5C53BAB7BD4F43B72C3233DA8D4D31686563353S83AA3151E4FAFF 

2611 ! ATTENTION 

2612 DATA A02BA3CAC3E7ECFAS4C56799C73C53E5E0E151 75521 080AB5AC6615D20EE1 361 1B81S3 

2613 DATA 35AA508D1 2S537A31EB547366D35A84F6E4S56B3AC56B31545F8B24A3552265D4D6235 

2614 DATA 52D583B382330ED551B2CAA25800C7884B40003B3823E04C2703306065325217AFA663 

2615 DATA A57B57FA34D223AD5218A3CDA600487E51AB61 33EC2E4BAC5A65386AECFF07 

2616 ! FRET 

2617 DATA 02082E39F5404FB36BECD635D029E2366BD3CAE2A354B3CE2D6E71BA122D2CAACE2D57 

2618 DATA 538B3A64473355638A230528CBBEFD7F00 
2613 ! FEUX 

2620 DATA 0C28D68C01 35464340021 AD040728B7377333AC3C321D44CE7EC7B38B3A889C434E2A7 

2621 DATA 24AA1E574A323DAAA63D8E35339255D6F233E2CF4659CC1 3FE3F 00 

2622 RESTORE 2624:F0R 1=0 TO 70:READ A:CALL POKE(51072t I , A) :NEXT :RETURN 

2623 ! DATA BOOTSTRAP 

2624 DATA 6,138,133,170,208,13,138,193,171,208,14,246,128,36,82,6 

2625 DATA 128,36,202,252,128,36,45,30,226,32,45,0,226,240,142,199 

2626 DATA 188,35,15,130,190,130,190,184,128,36,142,133,188,35,15,201 

2627 DATA 100,155,126,211,126,121 ,0,125,224,218,5,10,42,48,45,10 

2628 DATA 231,4,35,15,40,9,10 

2629 RESTORE 2631 : ADR=50344:G0SU6 2633:RETURN 

2630 ! DATA SPEECH 
2E31 DATA 88C4000AFB0AZ 

2632 GOSUB 2633:CAl_L POKEO, HIGH, LOW > :CALU EXEC ( 50344 >: RETURN 

2633 HIGH=INT(ADR/256> :L0W=ADR-256*HIGH :CALL POKE< 125, HIGH, LOW) 

2634 CALL EXEC (51 072) :RETURN 
3000 ! SORTIE DG 

3005 0R=1 :S0N=133:G0SUB 2200 
3010 A=0:B=1 :F0RCE=3: GOSUB 2000 
3020 A=-1:B=1 :F0RCE=2 :GOSUB 2000 
303d A=-1 :B=0:FORCE=3:GOSU6 2000 
3040' RETURN 



3100 
31 OS 
3110 
3120 



! RETOUR DD 

X=16:S0N=17t:G0SUB 2200 

A=0:B=1 :F0RCE=3:G0SUB 2000 

A== -1 :B=1 :F0RCE=6:G0SU6 2000 
3130 N0TE*="00D0DODOMIO0MIDOMISISI"lJI=1 :DI=3: GOSUB 1300: RETURN 
3200 ! RETOUR GD 
3205 DR=1 :S0N=158:G0SUB 2200 

3210 A=0:B=1:IF Y = E THEN F0RCE=10 ELSE F0RCE=3 : GOSUB 2000 
3220 A=1:B=1 :F0RCE=2 : GOSUB 2000 
3230 A=1 :B=0:F0RCE=3:G0SU6 2000 
3240 RETURN 
3300 (RETOUR GG 

3310 A=0:6=1:F0RCE=11:G0SU& 2000 :S0N=149 :GOSUB 2200 
3320 A=1 :B=1 :F0RCE=6:G0SUB 2000 

3330 NOTt="DODOOOOOMIDOMIDOMISISI": JI=1 :DI=3:G0SUB 1300:RETURN 
3300 IF T(Y,X>=18 THEN 4000 ELSE 4500 



I=10:G0SUB 4100 



4000 


! FLIP GAUCHE 


4005 


FOR 1=1 TO 10 


4010 


CALL KEY1 (C,D) 


4020 


IF C=ASC("1")THEN 


4025 


NEXT 


4030 


S0N=105:G0SUB 2200 


4040 


CALL COLOR <" 1W6">: 


4050 


RETURN 


4100 


CALL C0L0R("1WB">: 


4110 


F0RCE=INTRND(20) 



LOCATE (13,8):PRINT 
LOCATE (13,8)rPRINT 



4120 DIR=INTRND(2) 

4130 ON DIR GOSUB 1510,1520 

4135 GOSUB 2000 

4140 RETURN 

4500 ! FLIP DROIT 

4505 FOR 1=1 TO 10 

4510 CALL KEY1(C,D) 

4520 IF C--ASC("0")THEN I = 10:G0SUB 4600 

4525 NEXT 

4530 S0N=125:G0SUB 2200 



':LOCATE (5,2):PRINT 



'R":LOCATE (5,2):PRINT 



1W6"):L0CATE ( 13, 10) :PRINT "4":L0CATE (8,16):PRINT "4" 



4540 CALL COLORC 

4550 RETURN 

4600 CALL C0L0R("1WB"> :LOCATE ( 13 , 10) :PRINT 

4610 FORCE=INTRN0(20) 

4615 DIR=INTRND<1) 

4620 ON DIR GOSUB 1580,1510 

4625 GOSUB 2000 

4630 RETURN 

5000 RESTORE 5010:CLS "YbG":GUSUB 10020 

5010 DATA 1Yb,2,11 ,*, 12, 1 ,2, 12, *,8, 1 ,8,13,*, 

5020 DATA 3, 23, z , 1 , 1 , 10,21 , *, 4, 1 ,0 

5030 DATA 1 YC,2,24,X , 1 , 1 , 2 , 25, Y, 1 , 1 , 3,25 ,a , 1 , 1 ,0 

5040 DATA 1 Yb, 3,24,Z, 1 , 1 , , 1Cb,2 ,23, W, 1 , 1 , 

5050 DATA 1Mb ,4, 24, b , 1 , 1 ,4,25,c , 1 , 1 ,5, 24 ,d, 1 , 1 ,5, 25 , 

5060 DATA 6,23 , f , 1 , 1 , 6, 24, e , 1 , 1 , 6, 25 , *, 1 , 1 , 7 ,22 , j, 



S":LOCATE (8,16>:PRINT 



10,3,13,*,1 ,10 



1 

1 ,7 , 



1 

23, g, 1,1 



5070 DATA 7 ,24 ,h, 1 , 1 ,7 ,25, i , 1 , 1 ,8 ,23 ,*, 1 , 1 ,8,24 ,n , 1 , 1 , 8 ,25, * , 1 , 1 
5080 DATA 9,24 , d , 1 , 1 , 9,25,« , 1 , 1 , 10 ,24 ,p , 1 , 1 , 10, 25 ,q, 1 , 1 , 1 1 , ^ ,' > 1 < 1 



5080 
5090 


DATA 3 , 24 , d , 1 , 1 , 3 , 25 , « , 1 , 1 , 1 o , ^» , P < i, i , iv,uih, '< '/ ■ ■>--•■ • ■ > 
OATA 11 , 25, s, 1,1, 12, 24, r, 1,1 ,12, 25, a, 1,1 ,0 


5100 


DATA 1RY, 8, 21 ,k, 1,1, 8, 22, I ,1,1,0 


5110 


DATA 1Gb,13,22,v,1,1,13,23,w,1,1,13,2*,x,1,1,13,25,y,1,1,0 


5120 


DATA FIN 


5130 


RETURN 


6000 


! PRESENTATION 


6010 


CALL COLOR ("OGb") 


6020 


X=17:Y=8:REST0RE 6200 


6030 


READ FORCE, A, B _ 


6035 


SN=INTRND(7)lON SN GOSUB 7000,7010,7020,7030,7040,7050,7060 


6036 


CALL POKE (258, SO, 130) 


6040 


IF F0RCE=-1 THEN GOSUB 6100iRETURN 


6045 


CALL POKE (126, 104,1) 


E050 


GOSUB 2400 


E060 


LOCATE <Y,X):PRINT CHR*(1) 


6070 


GOTO 6030 


6100 


CALL COLOR("0Yb"):LOCATE (22,1):PRINT "TAPEZ SUR UNE TOUCHE" 


6105 


CALL POKE (259,0) 


6110 


RETURN 



6200 DATA 9,0,1,2,-1,0,2,1,-1,4,-1,1,1,0,1,4,1,0,4,-1,-1,1,0 

6210 DATA 5,-1,0,3,1,0,2,1,1,1,0,-1,3,1,0,3,1,0,11,-1,0 

£220 DATA 3,1,0,2,1,1,2,1,0,1,0,-1,4,-1,0,3,-1,0,11,1,0,1,-1,1 

6230 DATA 1,1,0,11,-1,0,1,1,-1,2,0,-1,1,1,0,2,0,1,3,1,1 

6240 DATA 5,-1,0,1,0,-1,5,1,0,6,1,0,2,1,0,5,1,0,4,0,-1,3,1,0 

6250 DATA 3,-1,1,5,1,0,3,0,-1,5,1,0,15,-1,0,6,1,0 

6260 DATA 2,1,1,3,-1,1,4,-1,0,5,0,-1,1,1,0,5,1,0,3,0,1,2,-1,-1 

6270 DATA 10,1,0,4,-1,1,3,-1,0,4,0,-1,8,-1,0,2,1,0,8,1,0,1,0,1 

6280 DATA 2,-1,1,5,-1,0,2,0,-1,3,-1,0,5,1,0,4,-1,0,1,1,0 

6230 DATA 3,0,1,13,1,0,3,0,-1,1,0,1,9,-1,0,3,-1,0,5,1,0,8,-1,0,2,0,1 

6300 DATA 3,1,0,7,1,0,1,0,-1,5,1,0,1,1,1,1,1,0,5,-1,0,1,1,0,5,1,0 

6310 DATA -1 ,0,0 

6500 ! PRESENTATION 

6510 CLS "Bbb":CALL COLOR( "OCLH" ) :LOCATE (5,6) 

6520 PRINT "NNOOMMBBRREE DDEE JJOOUUEEUURRSS ??" 

6530 CALL COLOR( "OMLH"') :LOCATE (6,6) 

6540 PRINT "NNOOMMBBRREE DDEE JJOOUUEEUURRSS ??" 

6550 CALL COLOR( "OCLH" ) :LOCATE O,10)lPRINT "(( 11 OOUU 22 ))" 

6560 CALL COLORC "OYLH" ) -.LOCATE ( 10, 10) : PRINT "(( 11 ODUU 22 ))" 

6570 CALL COL0R( "OGb" ) lLOCATE ( 20 , 1 >; INPUT "UOTRE REPONSE:";JR 

6580 RETURN 

6800 {BALL 

6805 IF CRB=3 THEN CRB=1 

6810 ON CRB GOTO 6820,6840 

6820 BALL1=BALL1t1 

6830 CALL COLOR ( "OMB" ) :LOCATE (6,27):PRINT BALL1:RETURN 

6840 BALL2=BALL2t1 

6850 CALL COLOR( "OMB" ): LOCATE (6,38):PRINT BALL2 

6860 RETURN 

7000 S0=199:RETURN 

7010 S0=149:RETURN 

7020 S0=105:RETURN 

7030 S0=118:RETURN 

7040 S0=158:RETURN 

7050 S0=176:RETURN 

7060 S0=133:RETURN 

8000 ! BONUS 

8030 CALL COLORC'OYM") 

8035 IF JR=1 THEN 8045 

8040 ON CRU GOTO 8080,8045 

8045 B0NUS1=E:0NUS1*E:0NUS 

8050 LOCATE ( 1 5 , 24 ) : PRINT US ING " BttBBtl " , B0NUS1 

8060 RETURN 

8080 B0NUS2=B0NUS2tB0NUS 

8085 LOCATE ( 1 5 , 32) :PRINT USING"»ttttMn" , B0NUS2 

8030 RETURN 

3000 ! LANCEMENT BALLE 

3001 CALL COLORC'OBB"):LOCATE ( 16 , 18) :PRINT " ":LOCATE ( 17, 18 ) :PRINT " " 

3002 CALL C0L0RC1RB") :LOCATE (13,18) 
9003 PRINT "J":LOCATE (21 , 18) iPRINT "*" 

9005 CALL COLORC'OBB") :LOCATE (21 , 18) :PRINT " ":CALL COLOR( "1RB" ) :LOCATE (19,18) 

3006 PRINT "»":LOCATE ( 1 8, 18) :PRINT "J":LOCATE ( 17, 18 ) :PRINT "J" 

9020 Y=16 

9030 Y=Y-1 

3035 CALL POKE ( 1 26 , 1 04 , 1 ) 

3040 CALL P0KE(120,17,Y) 

3050 CALL EXEC (50725) 

3065 IF Y=3 THEN X=17:CALL C0L0R( " 1GB" ) :LOCATE (3,18)lPRINT "2":RETURN 

3070 GOTO 3030 

3080 RETURN 

10000 ! DESSIN PIN BALL 

10010 CLS "YBB" 

10020 READ C* 

10030 READ Y:IF Y=0 THEN 10100 

10040 READ X,A*,y,N 

10050 CALL COLOR(C») :LOCATE (Y,X) 

10060 FOR 1=0 TO U-1 

10065 LOCATE <YtI,X) 

10070 PRINT RPT$(A*,N) 

10080 NEXT I 

10030 GOTO 10030 

10100 READ C»:IF C*="FIN"THEN RETURN 

10110 READ Y:GOTO 10040 

10120 DATA OGB, 4, 21 , PLAYER 1 , 1 , 1 ,4, 32, PLAYER 2,1,1,0 

10130 DATA 1GB,8,9,M,1 ,1 ,6, 12,M, 1 , 1 ,9, 14 ,M , 1 ,1 

10140 DATA 1,1,*, 20,1 , 1 ,2,0, 1 , 14, 1 , 16, 1**», 1 , 1 

10150 DATA 2,17,2**,1 ,1 ,3, 18, 2*, 1,1 ,4,19,*,1 ,1 

10160 DATA 5,17,G *, 13,1,0 

10170 DATA 1BG, 18,17,3*. ,1,1, 19, 2, 2, 1,1, 13, 16, 3.*., 1,1, 20, 2,. 2, 1,1 

10180 DATA 20,15,3. .*, ,1,1 ,0 

10130 DATA 1RB, 5, 7, 3, 1,1, 11 ,9,9 9 9, 1 , 1 , 17, 18, J, 2, 1 , 19 , 18 ,* ,2, 1 

10200 DATA 8, 27, E, 1, 1, 8, 33, F, 1, 1,9, 28, E, 1,1 ,9,32, F, 1,1 

10210 DATA 10,23,E F, 1,1,0 

10220 DATA ORB, 1 , 21 , GAME 1,1,1,0 

10230 DATA OMB, 6, 21 , BALL N BALL N 0,1,1,0 

10240 DATA OCB, 1 ,30, FREE GAME 0,1,1,0 

10250 DATA OYB, 22,24 , RECORD 000000,1,1,0 

10260 DATA 1MB, 8, 4, *3, 1 , 1 ,4, 10,7 7 7,1,1,13,6,7,1,1,0 

10270 DATA 1BM, 7,4, .2, 1 , 1 , 

10280 DATA 1WB,3,4, AB, 1 , 1 ,4,4 ,CD, 1 , 1 ,5,2, 5, 1 , 1 ,8, 16,4, 1 , 1 , 19,8, 5 4,1,1,0 

10230 DATA 1CB,7,2, G, 10, 1 ,3 ,3 ,G, 7 , 1 

10300 DATA 17, 3, E, 1,1, 18, 4, E, 1,1, 13, 5, I, 1,3, 13, 11, I, 1,3, 2, 11, 8 8,1,1 

10310 DATA 13, 14, G, 3,1 ,13,16, H,4, 1,17, 15, F, 1,1, 18, 14,F,1 ,1 ,0 

10330 DATA 1Bb, 15, 5, 2, 1,1, 16, 5,. 2, 1,1, 16, 12, 3., 1,1, 17, 12,., 1,1,0 

10340 DATA 1bB, 1 7, 13,3, 1 , 1 ,0 

10350 DATA 1BC , 10,24 , 3. .2, 1 , 1 , 10 , 33, 3. .2, 1 , 1 , 1 1 , 23,3. . . . , 1 , 1 

10360 OATA 11,33, ....2, 1,1, 12,28,2***3, 1,1, 13,29,. ,4,3 

10370 DATA 16 ,26, . ,2,3, 16,32 ,. ,2,3, 17 ,25,3. ..».».. .2, 1 , 1 

10380 DATA 18,24, 3««* .*«*. »*«2, 1 , 1 

10390 DATA 19 , 24 ,..**.**«.**.., 1 , 1 , 12, 28 , 2***3, 1 , 1 ,0 

10400 OATA 1CB,17,29,3 2,1,1,20,24,2***3 2***3, 1 , 1 , 1 1 ,30,L, 2, 1 

10410 DATA 10, 30, K, 1,1,0 

10420 DATA OYb, 12, 23, SCORE, 1 , 1 , 12, 33 , SCORE, 1 , 1 , 13,23 ,000000, 1 , 1 

1 0430 DATA 1 3 , 32 , 000000 , 1 , 1 , , OYM , 1 4 , 24 , BONUS , 1 , 1 , 1 4 , 32 , BONUS , 1 , 1 

10440 DATA 15,25,0000,1,1,15,32,0000,1,1,0 

10450 DATA OCb, 18,25 , LOT, 1 , 1 , 18, 33, LOT , 1 , 1 , 19,26,00, 1 , 1 , 19, 33 , 00 , 1 , 1 ,0 

10460 DATA FIN 

10500 END 



LE MASQUE DU 
GRAILLE 



THOMSON T07 70,MO5 



/ 



T<?M 



Vous etes INDALNA TOM I'explorateur intrepide, a qui votre 
ami le professeur TRIFOUGNON vient de leguer en mou- 
rant une carte indiquant ('emplacement presume du raris- 
sime "MASQUE du GRAILLE". Que de dangers en pers- 
pective I.. 

Yves KREICHER 



Mode d'emploi : 

Tapez et sauvegardez a la suite ces deux programmes (le second par 
SAVE'GRAILLE"). Le lancement du premier qui contient la presentation 
charge et lance automatiquement le programme principal. Sachez que les 
possesseur de T07 + 16 Ko ne pourront malheureusement faire tourner 
ce programme sur leur appareil et que les possesseurs de M05 devront 
supprimer les pokes des lignes 1065 a 1067. 




£fJTPE \&? APABE9 
ET \& COfSS& l fc NE 

FA 1 '! I>A£ M£T7?E 
10 tofes/ 



LISTING 1 



4 ' ♦ ♦♦.♦♦.♦* + ♦******#***#**#****** 

5 ' <■ Yves KREICHER ♦ 

6 '+ presents * 
2 ' * LE MASQUE * 

9 '» DU * 

10 '• GRAILLE. * 

11 ' * pour * 

12 '« T07/70 * 

£0 CLEAR.. .28 
30 GCSUB 31000 

40 STREEN. 0. 0: C0NS0LE0. £4. 0, 0: CLS 
45 PRINTCHR*<2B) 

50 FOR 1=6 TO 15:F0R E = l T07: ATTR60, 1 : LO 
CATEt-.£::OLORE:PRINT"TOUT COMMENCA UN JO 
UR PAR CETTE LETTRE" : NEXTE: NEXT I 
60 BOXF(20,47)-(300, 180), -8 
70 COLOR 1,7!ATTRB1,1 

.80 LGCATE31,7:PRINTGR*(19)GR*(£0)GR*(£1> 
80 L0CATE31,9:PRINTGR*(22)GR*C23)GR*(£4) 
100 L0CATE31, 11:PRINTGR*C25)GR*(£6)GR*(£ 

110 COLOR4:hTTRB1,0 

120 L0CATE4. l£:PRINT"Mr INDALNA TOPI" 

130 L0CATE4. 14: PRINT"Cen tre " 

140 LOCATES, 15:PRINT"archeolo«io|ue" 

150 L0CATE4. 17: PRINT"09876 NACEIO" 

160 LOCATE S,19:PRINT"BRESIL" 

180 PLAY"T1£L96PP" 

200 COLOR, 

210 BOXF. £6,47)-(368, 180), -8 

220 LOCATEO.,2: ATTRB0, l:PRINT" 

230 LINE(18,47)-(146, 168),0 

240 LINE(302,47)-( 160. 100), 

250 LINEC140. 100)-(160, 100),0 

260 LINE'364, 186)-(157, 166),0 

270 L I NEC 17. 180 )-< 143, 160).0 

280 PLAY"L96PP" 

290 BOXF(£6.47)-(360. 180), -8 

380 LI=140:FOR 1=45 TO 3TEP-1 : LINE'' 160 

-LIJI )-(160+LI,I),7:LI=LI-1.5:NEXT 

316lLINE(18, 47)-<140, 180>,0 

320. LINE: 302, 47) -(160, 100),0 

330 ^INE '140, 10O)-<160, 100>,e 

340 ;_INE::304, 186)- (157, 166). 6 

350 LI NEC 17, 180) -(143, 100). 

360 LINE(73, 70)-(238,76),0 

370 PLAY"PP" 

330 CLS: SCREEN. 7,0 

390 ATTRB1,6:L0CATE16, l:PRINT"Cher TOM." 

400 L0CATEl,3:PRINT"Aujourd' hui j'ax une 

atauvaise nouvelle a t' annoncer. Ton grand 

aiKi le professeur TRIFOUGNON uient de 

■ our lr . " 

410 PRINT"Obeissant a sa derniere u 

olonte je joins a cette lettreune carte 

indiquant ou se trouverait le fameux MAS 

QUE DU GRAILLE valant plusieurs 

■illions de dc-llards." 

420 LOCATE37.20:PRINTGR*C16> 

430 PlAY'TPPP" : PLAY"PPPP" : CLS 

440 L0CATEl,3:PRINT"Mais Je vous pre- 

viens que si vous vous decidez a 

tenter cette aventu-re il vous taudra 

eviter mille dangers. " :PRINT 

450 PRINT' D' autres ont essa-je mais ne so 

nt jainais revenus. " :PLAY"PPPPP" 

460 •«***♦***»*♦»*♦****** 

465 '» * 

478 '» CARTE * 

475 ' * * 

430 '♦»♦.♦«♦♦ t ♦♦♦♦♦♦♦*♦*♦ 

500 PRINTCHR*(£7)CHR*(32>CHR*C127):CLS 

510 ATTRB 1, 1 : LOCATES, 10: COLOR 1 1 PR I NTGR*( 

0) 

520 FOR 1=0 TO 6 

570 LINE(£00+I,0)-U60+I,56),4 

540 LINE-(150+I,88>,4 

550 LINE-i. 153+1, 90), 4 

560 LINE-(157+I, 110), 4 

570 LINE-(1S8+I, 190), 4 

580 LINE-'200+I,200>,4 

608 NEXT 

610 ATTRB0,0:COLOR0:LOCATE17.4:PRINTGR*< 

6)iGR*<7) 

620 L0CATE18,3:PRINTGR*(2>;GR*<3):GR*(4) 

;R*<5) 

630 L0CATE37,2:PRINTGR*(3);GR*(9);GR*(16 

) 

640 L0CATE37,3:PRINTGR*(11);GR*(12);GR*( 

13) 

650 L0CATE38, l:PRINT"n" 

660 L0CATE38,4:PRINT"s" 

670 COLOR0: LOCATE 10, 18: PRINTGR*( 15) 

688 LOCATE10, 19:.PRINTGR*( 17) 

690 L0CATE2,15:PRINT"J U N G L E" 

700 LINE.200, 180)-(210, 150),0 

710 LINE-(236, 175), 

720 LINEC246, 156>-<227, 172). 

730 LINE (240, 156)-C268, 190),0 

740 L0CATE26,22:C0L0Rl:PRINT"P!C ASSO" 

750 RUN"GRAILLE" 

990 ' 

1000 '»♦♦♦«»♦»♦:*♦♦»*»♦♦*♦♦»«. 

1010 •* * 

1020 '» CARACTERES SPECIAUX * 

1030 '* « 

1040 '****»*»******»*******»* 

1050 • 

31000 DEFGR* (6 )=126, 189.219,255,255,219, 
189,126 

31001 DEFGR*(1)=6, 0,8,8, 6. 0,0,0 

31002 DEFGR*(2>=0, 0, 8, 1, 1.1,29, 19 

31003 DEFGR*(3)=0, 1, 17, 144, 16, 92.0,224 

31004 DEFGR*(4>=141,21,213,89,64,0,0,0 

31005 DEFGR*(5>=0, 0,128.224,0.0,0,0 
31886 DEFGR*(6>=0, 1, 1, 9, 101, 166, 248, 64 
31007 DEFGR*(7)=16, 148,63.64,64,128,0,0 
31608 DEFGR*(8>=6,6,0,2, 1,225, 128,231 
31809 DEFGR*(9)=16, 16,56,56. 187, 187, 109, 
215 

31010 DEFGR*(10)=0, 0,0, 128,8, 12,30,210 

31011 DEFGR*(11>=135,2£5,8, 1. 1,2,0,0 

31012 DEFGR*(1£)=187,215, 108, 187, 187,56, 
16,16 

31813 DEFGR*(13)=216,26. 12. 0.0, 128,0,8 

31014 DEFGR*(14)=16,52,26.88, 12, 112,52,2 
6 

31015 DEFGR* (1 5 >=6, 6, 48, 62. 229. 87,1 £1,69 

31016 DEFGR*C16)=145, 150. 156.243.56,244, 
162,225 



31017 DEFGR* (17) =54, 88, 78, 24. 40. 24, 24, 66 
310 IS DEFGR* (18) =127, 161,51, 12. 12. 12,12, 
30 

31019 DEFGR*<19)=0,0,0,0,0,0,0, 1 

31020 DEFGR* (20) =0,0. 0,6, 6, 6. 6. 85 

31627 DEFGR* (21) =0,0, 0,6. 8, 0.0. 84 

31024 DEFGR*(2£)=0, 1,0,1,0.1,0,1 

31025 DEFGR*c£3)=£55,£40,£39,215. 196,236 
,195,239 

31026 DEFGR J (24) =248, 92, 40. £8, £86. £04,£1 
6.15c 

31027 DEFGR*(25)=0, 1,0, 1,6, 1,3,6 

31628 DEFGR*(£S>=£41,231.£40,£47,£55,35, 
9.6 

3162? DEFGR*(£7)=184,60. 126. 188.248,34,0 

,0 

31030 RETURN 



LISTING 2 



16 CLEAR, .87:CONSOLE6,£4,0,0:CLS:SCREEN, 

8,0 

20 PRINTCHR*(.20):LF*=CHR*(16: :G0SUB 3100 

0:GOSUB31200 

40 '•»+»•♦»»•>♦♦«*♦♦«♦♦♦»♦»+. 

50 '* CARACTERES GRAPHIQUES * 

60 •♦♦*«♦**♦♦*♦♦♦«***♦««**♦«♦ 

70 DEFGR*(6)=5,5,5,5,5,5,5,5 

80 DEFGR* C 1 )=223, 223, 223, 0, 251 , £5 1 , £5 1 , 

90 DEFGR*(2)=1,2,4,8, 16, 160. 192.224 

100 DEFGR*(3)-0, 6,0, 73,73, 73,91,255 

110 DEFGR* C4)=34, 26, 28,54.62,26,6.0 

120 DEFGR*(5)=143,223, 143,0,248,2,3,248 

130 DEFGR* (6)=60, 126,255, 126,60,0,0,0 

140 DEFGR*(7)=60,56,54,46.64, 102, 102, 119 

150 DEFGR*C8)=66,28, 108. 116.2, 102, 102,23 

8 

160 DEFGR*C9)=56, 124, £44. £55, 1 £4, 62, 56, 1 

24 

170 DEFGR*(16)=236,218,218.216,223,2£2, 1 

92,126 

130 DEFGR*(11)=60, 24. £4, £4, 0, £4, £8, 30 

190 DEFGR*(12)=28,62,47,255.6£,127,28,62 

200 DEFGR* (13) = 103, 91, 91, 27. 251, 123,3, 12 

6 

210 DEFGR* ( 14)=60, 24, 24,24,0,24,56, 120 

220 DEFGR*(15)=0,30,47, 127, £30, 84, £4, £32 

230 DEFGR*(16)=1£,8,28,40, 108,216, 108, 13 

6 

240 DEFGR*C17)=124,48, 16, 16, 40, 16, 16, 1 12 

250 DEFGR* ( 18) =0, 120,244,254,103,42,24,2 

3 

260 DEFGR*(19)=48, 16,56,20,54,27,54, 17 

278 6EFER*(283=62, 12, 9,8, 28,8, 8, 12 

288 DEFGR*(21 )=62, 38, 26, 246, 206, 62, 62, 60 

290 DEFGR*(£2)=60,56, 112, 16, 192, 19£, 128, 



300 DEFGR*(23)=0,0, 1, 1,6,3, 1,0 
310 DEFGR»(24)=68,254,239, 131,0,0,0,0 
320 DEFGR*( 25) =0,0,0, 32, £24, 192.0,0 
330 DEFGR»C26)=0,0, 1,25,30,6,0,0 
340 DEFGR*(27>=60,£54,239, 134. 1,3,0,0 
350 DEFGR»(28>=0,0,0,0, 128, 128,0,0 
360 DEFGR*(29)=7,4,4,4,2,2, 1, 1 
370 DEFGR«(30)=24, 191,243,242.247,227,23 
0,231 

380 DEFGR*(31)=224,224, 128,192,64, 128, 12 
8,8 

390 DEFGR»(32)=0, 3,31, 19,51,255,86,254 
400 DEFGR*(33)=255, 117, 158, 189,58, 121, 12 
5,246 

418 DEFGRS(34)=189,254,245,218,254,245,2 
51,252 

428 DEFGR*(35)«0, 0,0, 0,0,0, 1,3 
430 DEFGR*(36)=251,212,255,249,234,255, 1 
71,108 

440 DEFGR*(37)=0, 0,0,0, 0,0, 128, 192 
456 DEFGR»(38)=0,8,0,0, 0,0,1,2 
460 DEFGR*(39)=63,237,206,204, 163,239,23 
6, 141 

470 DEFGR*(40)=69, 167, 118,55,197,246, 181 
,54 

480 DEFGR$(41)=239,247, 113, 126, 127,63,7, 
15 

490 DEFGR*':4£)=247,238,266,24,246,25£,16 
0,246 

560 DEFGR$(43)=0,0,£,4,63, 127,132,2 
516 DEFGR*(44)=0,0,0,0,252,248,0.0 
5£0 DEFGRt(45)=0, 0,0, 0,6, 15,27,121 
530 DEFGR*(46)=8,20,31,30,63,56,240,2£4 
540 DEFGR*(47)=0,6,6,0,57,125,234, 131 
556 DEFGR*(48 )=8, £8,31, 30, 223, 236, 56, 24 
560 DEFGR«'49)=6, 128, 192, 193, 195,219, 189 
.189 

570 DEFGRs(50)=189,219.231,£55.255,255,6 
0,195 

530 DEFGR$(51)=£55,255,231, 192, 3, 195, 1 9£ 
, 192 

596 DEFGR*(5£)=0, 1, 3, 131, 195, £19. 189, 189 
600 DEFGR$(53)=255, 255, 231,0, 195,195,3,3 
610 DEFGR$(54)=7,7,5,29,26,5.7,7 
620 DEFGR$ ( 55 )=0, 0, 0, 255, 255, 0. 0, 
630 DEFGRt(56)=224,224, 160, 184.88.160,22 
4,224 

640 DEFGR*(57) = 153,90,60,255.255,60.90, 1 
53 

650 •DEFGR*(58)=0,225,38.238.244, 1 16, 184, 
24 

660 DEFGR*<59)=0,48,211,62, 13,2, 1,0 
670 DEFGR*C60) = 32, 113, 1 18, 246. £44. £36, 24 
8,6 

.686 DEFGRJ(61)=8,8,8.24,24,66.66,255 
698 DEFGR*' 62'=0,0,0.8,21,8.0.8 
700 DEFGR* (S3 .' =0, 0,0,21, 254,21. 0, 
710 DEFGR*(64>=24,60, 122,255,252,254, 120 
,240 

720 DEFGR* (65) =251, £46, £43, £5 1.2 16, 2 16, 2 
22,222 

730 DEFGR* (.66 )=0, 24, 52, 74 , 255.82 .44,24 
740 DEFGR*(67>=£55, 1£6, 60, 60, 60. 68, 60. 36 
750 DEFGR* (68) =£55, £55, £55. 56. 56. 43, 43, 4 
8 
760 DEFGR*(69)=3£,32,3£,48,48.56. 1£7.255 

770 DEFGR* (70) =32, 32, 32, 32, 32. 32, 80,32 

771 DEFGRJC71 )=24, 124.52,95, 109,90.63.40 
786 DEFGR* (72) =255, 85, 176,255.255.68,233 
,68 

796 DEFGR*(73)=6, 36, 255. 6. 238, 238. £39, 6 

800 DEFGR* (74) =32, 12, 104.255,245,255. 118 

,19£ 

810 DEFGR* (75) =85, 170. 85, 170. 35. 170, 85, 1 

70 

8£0 DEFGR* (76) = 96, 160,88,168,33, 176, 16, 1 

92 



830 DEFGR*(77>=128, 1£0. Ill, 1££. 1£7, 121, 1 

60, 19£ 

840 DEFGR* ( 73 )=0,££, 61, £3 1,6 1.23 1.6 1,22 

858 DEFGR* (79) =0,49, 102.221.227.255.94,4 

2 

860 DEFGR* (80) =2, 6, 28, £3£. 196. 243, 12,6 

878 DEFGR*(31 )=28,62,£39, 1£6, 14, :26. 14,4 

2 

880 DEFGR* (82) =106, 2 18, 154,30.54,48,70,2 

31 

890 DEFGR* (33) = 124, 122, 108, 1 18, 120, 1 IS, 1 

16, 126 

900 DEFGR* (84) =0,8, 0,0,3.63, 1£7.63 

910 DEFGR*(85)=122, 124, 122, 228, 202, £1 1, £ 

31, £55 

9£0 DEFGR* (86) =0,8, 0,0, 192. 120, £ IS, 2^2 

1008 ■ 

1810 '»*»*******»l(r»*i(li||**»i 

1020 '* DEBUT DU JEU * 

1030 ' i****************** 

1O40 ' 

1050 SCREEN, 0,0: CLS: VIE=4: SCO=0: h: WUS=iO 

60:VP0S=7:HP0S=2:MAXI=34:MINI=0:ANTIS0=0 

:GRAILLE=0 

1060 BOXF''0,0>-(39,2)CHR*(l£7'.4:COLnp7. 

41L0CATE1, l:PRINT"SCORE : "; SCO: L0CATE3B. 

:: PRINT "VIE : "; VIE: L0CATE14, 1:PRINT"B0NU 

S : ";B0NUS:COL0R,6 

1665 P0KE4H6£95,iiH62 

1066 P0KES.H6296,!,H39 

1067 P0KE&H6294,^H32 

107O MUSDE*(0)="L5A0O5SILASOFAHIREDO" 
1072 MUSDE*(1)="L5A0O4SILASOFAMIREDO" 

1074 MUSDE*(2) = "L5A0O3SILASOFA>11REDO" 

1075 MUSDE*(3)="L5A0O2SILASOFAMIREDO" 

1076 MUSDE*(4)="L5A0O1SILASOFAMIREDO" 

1077 MUSDE*(5)="L5A0O1SI#LA#SOFAMI#PEDO" 
1080 DIAMS=1 

1100 '****************«** 

1110 '* PREMIER TABLEAU * 

1120 'OK***************** 

1140 VP0S=7:HP0S=5:PRINTCHR*(£7)CHR*(113 

):BOXF(0,3)-(39,3)GR*(5>:LINE(0.4)-(39,4 

)GR*(1):BOXF(0, 10) -(33, 1£)GR*( 1 ) : B0XF(39 

,17>-(5, 1S)GR*(1):B0XF(8,££)-'39,£3)GR*( 

1150 LOCATE37,5:PRINTGR*(29);GR*(30);GR* 

(31):L0CATE37.6:PRINTGR*(32j:GR*(33):LIN 

E(38,7)-(3S, 15)GR*(34):L0CATE37, 16:PRINT 

GR* ( 35 ) ; GR* ( 36 ) ; GR* (37 ) 

1160 LOCATE0, 13:PRINTGR*(29);GR*("o;GR* 

( 3 1 ) : LOCATEO, 1 4 : PR I NTGR* ( 32 > ; GP* i 33 j : l I N 

E ( 1 , 1 5 ) - ( 1 , £0 ) GR* ( 34 ) : L0CATE8 . £ 1 : PR I NTGR 

*(35>i GR*(36);GR*(37) 

1170 FLECC1)=9:FLEC(2)=12:FLEC(3,=16:FLE 

C(4)=20:FLEC(5)=£4:FLEC(6)=25:FLEC(7)=28 

: LINE (34, 5) -(34, 16)CR*(B), 7i LINEf 3, !3)-( 

3,21)GR*iO '.7:FLEC(9)=7:FLEC(8) = 8:FLEC(9 

)=30:FLEC(1O>=28 

1180-roR 1 = 1 TO10:LOCATEFLEC'.I )+3.4:C0L0 

R7:PRINTGR*(2):PRINTCHR*(27)CHR*(il3):LO 

CATEFLEC(I).10: PRINTGR*(6) : NEXT 

1200 •»♦•♦«****♦*♦*♦♦♦♦♦♦ 

1210 '* JEU.. ♦ 

1220 ■♦»♦♦♦»♦*♦***♦»♦»♦♦» 

1240 COLORS: LOCATEHPOS, VPOS: PRINTGP*(<S) : 

LOCATEHPOS, VPOS + 1 : PR I NTGR* ( 16 ■ : LOCATEHPO 

S. VPOS+2:PRINTGR*(11):MINI=0:MAXI=34:ANT 

IS0=0 

1250 PERCHE=34 

1300 IF HP0S=34 THEN 1350 ELSE IF POINTc 

HP0S*8+7, (VP0S+3)*8+6)=-l THEN 1400 

1310 IF M0RT=1 THEN MORT=0:GOTO 1100 

1315 GOSUB 1500 

1320 GOSUB 2200: IF BONUS=0 T HEN GOTO 147 



1330 GOTO 1300 

1349 ' 

1350 •♦♦♦♦♦♦♦♦♦♦**»*♦♦♦♦♦ 

1351 ' 

1355 LINE 34,5)-(34, 10>GR*(0) . 7: HP0S=HP0 

S+l 

1360 GOSOB100B GOTO3160 

1400 ■«**♦♦♦*»♦♦♦•*»«♦♦♦♦ 

1410 '♦ MARCHE SUR * 

1420 '» PIECES » 

1430 ■***♦♦♦♦♦«♦♦*♦♦♦♦♦»♦ 

1440 L0CATEHP0S+3,4:PRINT" " 

1450 LOCATEHPOS* 1, 7: C0L0R7: PR I NTGR* (2) 

1460 PLAY"A0L6O5SI?IbLALAk)SOSOtoFAMI" 

1470 GOSUB2580 

1480 LOCATEHPOS* 1.7 -PRINT" " i HP0S=3: GOTO 

1310 
1500 •♦*♦♦♦♦***♦♦..♦»♦•• 

1510 '* DEPLACEMENT • 

1520 •*♦*»*♦♦♦♦♦«♦♦♦♦♦♦♦♦ 

1536 A=STICK<6> 

1546 ON A GOSUB 1666,1600,1700,1766,1880 

,1906, 1900, 1600 

1550 RETURN 

1600 '«****************** 

1610 '* SAUT EN HAUTEUR * 

1620 ■»*♦.♦♦♦*♦♦»***♦**»»♦ 

1622 ACR=0:IF ANTIS0=1 THEN RETURN 

1625 COLOR, 0: IF DIR=1 THEN GOTO 1660 

1626 IF HP0S>MAXI-3 THEN RETURN 

1630 C0L0R5:B0XF(HP0S,VP0S)-(HP0S,VP0S+2 

) L0CATEHP0S+2, VP0S-1 : PR I NTGR*<9) : LOC 

ATEHPOS+2, VPOS:PRINTGR*( 10) : L0CATEHP0S+1 

,VP0S+l:PRINTGR*(23);GR*(24);GR*(25):PLA 

Y"L404A1D0SIFAS0RE" 

1635 IF CORDE=l THEN GOTO 2000 

1640 L0CATEHP0S+2,VP0S-l:PRINT LOCATE 

HPOS+2, VPOS: PRINT" " : L0CATEHP0S+1, VPOS+1 

:PRINT" 

1650 LOCATEHPOS+3,VPOS:PRINTGR1(9):LOCAT 

EHPOS+3, VPOS + 1 : PR I NTGR* ( 10) : L0CATEHP0S+3 

,VP0S»2:PRINTGR*(7):PLAY"L403A1D0SIFAS0R 

E" : HP0S=HP0S»3 : RETURN 

1660 IF HP0S<MINI+3 THEN RETURN 

1665 COLORS: B0XF(HP0S, VP0S)-(HP0S, VPOS+2 

) L0CATEHP0S-£,VP0S-1:PRINTGR*< 1£):L0 

CATEHPOS-2,VPOS:PRINTGR*<13):L0CATEHP0S- 
3,VP0S+l:PRINTGR*(26);GR*(27):GR*(£8):PL 
AY"L404A1D0SIFAS0RE" 

1678 L0CATEHP0S-2,VP0S-l:PRINT LOCATE 

HP0S-2,VPOS:PRINT L0CATEHP0S-3. VPOS + 1 

:PRINT" 

1680 

TEHP 

3.VP 

ORE 

170O 

171 

1720 

1738 

TEHP 

:PRI 



L0CATEHP0S-3,VP0S:PRINTGR*C12>:L0CA 
'OS-3, VPOS+1 : PR I NTGR* ( 13) : LOCATEHPOS- 
'0S+£:PRINTGR*(14):PLAY"L403A1D0SIFAS 
:HP0S=HP0S-3:RETURN 

* MARCHE DROITE » 

»»...«»».♦»♦.*♦»,,, 

CR=0: LOCATEHPOS, VPOS: PR I NT LOCA 

OS, VPOS + 1: PR I NT LOCATEHPOS, VPOS+2 

":IF POOM THEN PJ = 7:POO = ELSE 



POO=l:PJ=ll 

1740 DIR=£:HPOS=HFOS+l: IF HPOS>MAXI THEN 

HPOS=MAXI 
1750 COLORS. O: LOCATEHPOS. VPOS: PRINTGRK9 
) : LOCATEHPOS, VPOS+1 : PR I NTGR* ( 10) : LOCATEH 
POS, VPOS+2: PRINTGR*(P J) 
1760 RETURN 
18O0 '##***####***##*** 

1810 '* ACCROUPIE * 

13£0 '**»****♦*****»*** 

18£2 COLORS, 0:ACR=l: LOCATEHPOS, VPOS: PR IN 

T" " 

1836 LOCATEHPOS. VPOS + 1: PR I NTGR* (64): LOCA 

TEHP0S,VP0S+£:PRINTGR*(65) 

1840 RETURN 

1900 '****»*****l(l******** 

1910 '* MARCHE GAUCHE * 
1920 •♦»»♦♦»*****♦****♦♦♦. 

1930 ACR=6: LOCATEHPOS. VPOS: PRINT LOCA 

TEHPOS, VPOS+1 : PR I NT LOCATEHPOS. VPOS+2 

:PRINT IF P00=1 THEN PJ=3:P0O=O ELSE 

P00=l:PJ=14 

1940 DIR=l:HPOS=HPOS-l: IF HPOS<MINI THEN 

HPOS=MINI 
1950 COLORS, 0: LOCATEHPOS. VPOS: PR I NTGR* (1 
2): LOCATEHPOS, VPOS + 1 : PR I NTGR* ( 13 ': LOCATE 
HPOS. VPOS+2 : PR I NTGR* (P J) 
I960 RETURN 

2200 '»:**♦:»:*♦♦*****»*♦ 
2210 '» BONUS * 
2££0 •»:*♦ + + + ♦**»«♦♦*♦:* 
££30 B0NUS=B0NUS-5:IF BONUS<0 THEN BONUS 

= 

2240 L0CATE14. 1 : C0L0R7, 4: PRINT"BONUS : "; 

BONUS 

2250 COLOR, 0:RETURN 

2500 ' *###**####*#*# 

2510 '* MORT.. * 

£5£0 '**»:♦**♦»***♦** 

£530 MORT=l:VIE=VIE-l:LOCATE30. 1:C0L0R7, 

4: PRINT" VIE : "; VIE: B0NUS=1 000: COLOR. 0: IF 

DIR = 1 THEN SC=15 ELSE SC=18 
£540 LOCATEHPOS, VPOS: PR I NTGR* (SO: LOCATE 
HPOS, VPOS+1 : PRINTGR*(SC+1 ) : LOCATEHPOS, VP 
0S+£:PRINTGR*(SC+£):PLAY"04L4A£SILAS0FAM 
IREDO" 

£550 LOCATEHPOS, VPOSSPRINT" ":LOCATEHPOS 
, VPOS + 1: PR I NTGR* (SO: LOCATEHPOS. VPOS+2: P 
RINTGR*(SC+1):PLAY"03L4A2SILASOFAMIREDO" 
£560 LOCATEHPOS, VPOS+1 : PRI NT" ":LOCATEHP 
OS, VPOS+£:PRINTGR*(SC):PLAY"02L4A2SILASO 
FAMIREDO" 

2576 LOCATEHPOS. VP0S+2:PRINT PLAY"01L 

4A2SILAS0FAMIRED0" 

£588 IF VIE=8 THEN GOTO 160O0 ELSE RETUR 

N 

3600 •♦+»••♦♦♦*+♦♦*♦♦♦ 

3010 '* J 

3028 •» PERCHES. * 

3030 •* * 

3040 •♦♦♦♦*«♦♦**♦*♦♦♦♦ 

3045 MUS=0 

3050 LOCATE HPOS, VPOS: C0L0R5, 0: PR I NTGR*( 

1£): LOCATEHPOS, VPOS+1 : PRINTGR*(£1 ) :LOCAT 

EHPOS, VP0S+£:PRINTGR*(£2):PLAYMUSDE*(MUS 

3060 VPOS=VPOS+l: IF P0INT(HP0S*8+6, ( VPOS 

+2)*8+6)(>-l THEN RETURN 

3670 MUS=MUS+l:IF MUS>3 THEN MUS=5 

3880 LOCATEHPOS, VPOS-l: PRINT" " 

3090 GOTO 3050 

3100 •*♦♦:»««»*♦♦♦♦♦♦****♦♦♦♦■♦♦: t« 

3110 •» ler TABLEAU, 2e»e ETAGE * 

3120 '♦*♦******»«*♦****♦♦♦♦♦»♦** 

3136 MAXI=36:MINI=3:TR0U(6)=7:TROU(l)=9: 

TR0U(2)=16iTROU<3)=14:TR0U(4)=17:TR0U(5) 

=18:SERP=7:SER=7:SERPE=16:HP0S=35:VP0S=1 

4 

3135 TR0U(6)=21:TR0U<7)=22:TR0U(3)=2S:TR 

0U(9)«26:TR0U(16)=36 

3140 PRINTCHR*(27)CHR*(113):F0R 1=0 TO10 

:L0CATETR0U<I),17:PRINTGR*(3):NEXT 

3150 IF HP0S=4 THEN 3250 

3152 IF P0INT(HP0S*8+7, (VP0S+3)*8+l)=-l 

THEN LOCATESER,SERPE:PRINT" ":GOTO 1470 

3155 GOSUB 2200 

3156 IF BONUS=0 THEN GOSUB2506: M0RT=6: LO 
CATESER,SERPE:PRINT GOTO 1166 

3166 GOSUB1500 

3165 GOSUB 3300 

3170 IF M0RT=1 THEN MORT=0: GOTO3260 

3175 GOTO3150 

3200 •»♦»♦**♦♦*♦«♦.*.*♦♦*♦♦ + .♦»» 

3210 LOCATEHPOS, SERPE: COLOR 1: PR I NTGR* (57 

> 

3215 PLAY "L4A0O5DOREM I FASOFAM IREDO" 

3220 LOCATESER,SERPE:PRINT" " 

3225 GOTO1470 

3250 '♦♦♦»♦♦«»♦♦*♦*»♦*.»»:»>♦♦«» 

3260 GOSUB 3600 

3270 GOTO 3560 

3300 '*****♦*♦*♦♦♦»*♦**»«*♦♦♦♦ 

3310 •* MOUVEMENT SERPENT. * 

3320 •♦*»**♦********»««*«*♦..*♦ 

3325 FOR 1=0 TO 1 

3330 IF SERP0=1 THEN SERPO=0: PS=45: PSE=4 

6 ELSE PS=47:PSE=48:SERP0=1 

3346 L0CATESER,SERPE:C0L0R2,8:PRINT" " 

3356 SER=SER+l:IF SER=MAXI-3 THEN SER=SE 

RP:L0CATEMAXI-3,SERPE:PRINT" " 

3368 LOCATE SER, SERPE: C0L0R2, 0: PRINTGR*( 

PS))GR*(PSE) 

3370 IF SER+1=HP0S THEN M0RT=1 : RETURN 

3388 NEXT I 

3398 RETURN 

3500 ' ft*************************** 

3510 '* ler TABLEAU , 3e»e ETAGE * 

3520 ' *♦♦*♦♦♦»***»«*♦.»*♦«*♦♦♦»♦.♦♦♦ 

3530 ANTISO=l:MINI=3:MAXI=39:VPOS=19:L0C 

ATESER, SERPE: PRINT" " 

3540 IF HP0S=39 THENGOSUB3600: ANTIS0=8: G 

OTO3700 

3545 GOSUB 1500: GOSUB2200: IF BONUS=0 THE 

N GOSUB2500:MORT=0:GOTO 1100 

3550 GOTO 3540 

3600 ' +♦♦»<♦»♦♦**♦♦♦♦♦♦+♦+♦+♦♦♦»♦ 

3610 '» CHANGEMENT DE TABLEAU * 

3620 * **»♦♦♦*»***♦♦♦**♦♦»*«♦««♦♦ + 

3630 B * ( 1 ■ = " B " : B* ( 2 ) = " " : B * ( 3 ) = " N " : B* ( 4 ) 

= " U " : B* ( 5 ) = " S " : MB* ( 1 ) = "DO " : MB* ( £ ) = " M I " : M 

B* ( 3 ) = "FA " : MB* ( 4 ) = " LA " : MB* ( 5 ) = " SO " : B* ( 6 ) 

= MB*(6)="FA" 

3640 C0NS0LE3,£4:CLS:VB=15 
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FUGITIF 

Fugitif traque par la police et vos anciens complices, vous 
voila dans de beaux draps a la recherche du fabuleux butin 
de votre dernier vol... 

Laurent BOUSQUET 




AMSTRAD 



BEA>X DPfiP*!! 



on Fere ca : 








SUITE DU 
N°130 



2510 REM 

2520 REM DATA - MUSIQUE 

2530 REM 

2540 DATA 253,253,253,253,284,313, 

319,338,373,373,313,253,130,130,13 

0,130,213,233,233, 253 , 284 , 284 , 253 , 

233,253,233,253,201 ,233,253,253,28 

4,313,313,338,373,338,338,338,338, 

313,338,373,373,373,373 

2550 DATA 100,250,100,0 

2560 REM 

2570 REM PRESENTATION 3 

2S80 REM 

2530 MODE 2 

2600 INK 0,1: INK 1,24: BORDER 1 

2610 LOCATE 34,4:PRINT "TABLEAU N. 

2620 LOCATE 3,7:PRINT "Vous entrez 

maintenant dans Id ville.»." 
2630 LOCATE 1,8: PRINT "Vous devez 
ecouler I es diamants que vous vene 
z de r ecuperer • " 

2640 LOCATE 1,3. -PRINT "Pour ce I a v 
ous devez etitrer dans les maisons 
et trouver deux acheteurs . " 
2650 LOCATE 3,11:PRINT "ATTENTION 
I Si vous tuez un de vos client,vo 
us avez perdu car vous ne pourez 

p t us ecouler- vos diamants . D 'autr- 
e part, eertaines maisons renferme 
nt des bandits"; 

2660 LOCATE 1,14:PRINT ";si vous n 
e tirez pas r apidement , i I vous tue 
ront.Vous pouvez egalement decouvr 
ir uhe bombe derriere la porte.»*F 
uyez avant qu ' e I I e n'explose." 
2670 LOCATE 3,16:PRINT "Enfin,mefi 
ez vous des voitures..." 
2680 LOCATE 3,18iPRINT "Bonne Chan 
ce ! " 

2630 LOCATE 20,22:PRINT "Appuyez s 
ur- une touche pour continuer" 
2700 FOR i»1 TO 40: f *=INKEY»: NEXT 
i 

2710 IF INKEY«="" THEN 2710 
2720 tab I =2 

2730 REM 

2740 REM TABLEAU 2 

2750 REM 

2760 RESTORE 

2770 MODE 1 

2780 INK 0,13: INK 3,9:INK 2,13:B0R 

DER 13 

2730 DIM entreedO) 

2800 entr=INT<RND<1 )*3) + 1 

2810 entre=INTCRND<1 >»9>f 1 : IF entr 

e=entr THEN 2810 ELSE entree(entr) 



X V05 MAf?<^/^ 
r*eT? 



"1 : en tree Centre )=1 

2820 FOR i = 1 TO 3: IF iOentre AND 

iOentr THEN entr ee < i > = INT< RNDC2) » 

2) *2 

2830 NEXT 

2840 eno=0 

2850 FOR i = 1 TO 40:L0CATE i,22:PRI 

NT CHR*(143) ; :NEXT 

2860 WINDOW 111,1,40,23,25 

2870 FOR i=4 TO 32 STEP 7 

2880 WINDOW 112, i , i + 5, 2, 7: PAPER 82, 

1 :CLS82 

2830 NEXT i 

2300 FOR i=5 TO 33 STEP 7 

2910 PEN 3 

2320 LOCATE i,4:PRINT CHR$(143);:L 

OCATE i*3,4:PRINT CHR*<143>; 

2930 PEN 3 

2940 LOCATE i + 1 , 6 : PRINT CHR*<143>: 

CHR*(143> ; 

2950 LOCATE i+1,7:PRINT CHR*(143); 

CHR*(143> ; 

2960 NEXT i 

2370 FOR i = 7 TO 28 STEP 7 

2980 WINDOW 82, i , i t 5, 12 , 1 7:PAPER 8 

2,1 :CLS82 

2930 NEXT i 

3000 FOR i=8 TO 23 STEP 7 

3010 LOCATE i,14:PRINT CHR$<143);: 

LOCATE i*3,14:PRINT CHR*<143>: 

3020 PEN 3 

3030 LOCATE i + 1 , 16: PRINT CHR*<143> 

;CHR*<143>; 

3040 LOCATE i+1,17:PRINT CHR*<143> 

;CHR*<143> : 

3050 NEXT i 

3060 PEN 1 

3070 yn>=INT(RND*20>+2:xm=1 

3080 n0=0:n1=202 

3030 LOCATE xm , ym- 1 : PRINT CHR*(n1+ 

n0);:L0CATE xm,ym:PRINT CHR*(n1tnO 

+ 1 ) ; 

3100 PEN 2 

3110 FOR i = 1 TO 7 

3120 IF RND<0.5 THEN xp=0 : xr-=0 : ELS 

E xp=3:xr=1 

3130 IF xr = THEN yv=7 ELSE yv=INT 

<RND<2>*2>«5t12 

3140 xv=INT(RN0<1 ) * ( 4- xi > ) *7 1 10 1 xp 

3150 LOCATE X V , yv : PRINT cai~2*I 

3160 NEXT i 

3170 PEN 1 

3180 a*=UPPER*( INKEY*) 

3130 IF a«=" n THEN 3330 

3200 IF a»=" " THEN FOR n=300 TO 2 

80 STEP -4:S0UND 1 ,n , 5, (n -276>/4 , , 

,1:NEXT:n0=0 

3210 IF a»="\" AND xm<40 AND TEST< 

xm»16+13,401-ym*16)<>1 AND TESTCxm 

• 16+13, 401-<ym-1 ) * 1 6 >< >1 THEN LOCA 

TE xm,ym-1 :PRINT " ";:L0CATE xm,ym 

: PR INT" "; :xm"xmt1 :n0=n0+2:n 1=202 

3220 IF a*="/" AND xm>1 AND TESTC C 

xm-1 >*16-3,401-ym*16)<>1 AND TESTC 

<xm- 1 >«16--3,401~<ym~1 )«16)< >1 THEN 

LOCATE xm,ym-1 :PRINT " "s. -LOCATE 
xm,ym: PRINT" "; : xm=xm~1 :n0=n0+2:n1 
= 208 



3230 IF a«="A" AND TEST ( xm*16-3 , 40 
1-<ym-2>«16>°»3 THEN GOTO 3650 
3240 IF a*="A" AND ym>2 AND TESTCx 
m*16-3,401-(ym-2>»16><>1 THEN LOCA 
TE xm,ym- 1 :PRINT " ";:L0CATE xm,ym 
SPRINT" " ; :ym=ym-1 :n0=0:n1=216 
3250 IF a*="Z" AND ym<22 AND TEST< 
xm*16 .3,401~<ym+1>*16>01 THEN LOC 
ATE xm,ym-1 :PRINT " ";:L0CATE xm,y 
miPRINT" " ; :ym=ym+1 :n0=0:n1=212 
3260 IF n0 = 4 THEN n0=0 
3270 LOCATE xm , ym- 1 : PRINT CHR$(n1t 
nO);:LOCATE xm, ym: PRINT CHR*<n1+nO 
+ 1 > ; 

3280 IF TEST(xm»16-3,369-ym»16)=2 
THEN yc=ym+2:xc=xm:G0SUB 3350 
3230 IF TEST(xnl»16-3,353-ym«16>=2 
THEN yc=ym+3:xc=xm:G0SUB 3350 
3300 IF TESTC xm*1 6-3, 449-ym*16 > =2 
THEN yc=ym-3:xc=xm:GOSUB 3500 
3310 IF TEST<xm*16-3,465-ym»16>=2 
THEN yc=yro-4:xc=xm:G0SUB 3500 
3320 READ note: IF note=0 THEN REST 
0RE:GOT0 3320 ELSE SOUND 2, note, 5 
3330 GOTO 3180 

3340 REM 

3350 REM Voitures traversent 

3360 REM 

3370 SOUND 1 , 200 : LOCATE xc,yc:PRIN 

T car2* 

3380 FOR i=1 TO 40 

3330 a*=UPPER*( INKEY*) 

3400 IF a*="\" THEN LOCATE xm,ym-1 

:PRINT " ";:L0CATE xc»,ym:PRINT " " 

; :xm=xm+1 :n1=202:G0T0 3430 

3410 IF a*="/" THEN LOCATE xm,yc»-1 

:PRINT " ";:L0CATE xm,ym:PRINT " " 

; :xm=xm-1 :n1=208:G0T0 3430 

3420 NEXT 

3430 LOCATE xm, ym- 1 : PRINT CHR*(n1) 

;:L0CATE xm , ym .-PRINT CHR*<n1+1); 

3440 FOR i = 1 TO 4:S0UND 1,50,4 

3450 LOCATE xc,yc:PRINT " ";:yc=yc 

-1:L0CATE xc,yc:PRINT carZt: 

3460 FOR g=1 TO 30: NEXT q 

3470 NEXT 

3480 IF xc=xm THEN 3630 ELSE LOCAT 

E xc,yc:PRINT " "; 

3430 RETURN 

3500 SOUND 1,200:L0CATE xc,yc:PRIN 

T car2* 

3510 FOR i=1 TO 40 

3520 a*=UPPER*( INKEY*) 

3530 IF a* = "\" THEN LOCATE xio,ym-1 

:PRINT " "; .-LOCATE xm,ym:PRINT " " 

; :xm=xm+1 :n1=202:G0T0 3560 

3540 IF a*='V" THEN LOCATE xm,ym-1 

:PRINT " ";:L0CATE xm,ym:PRINT " " 

; :xm=xm-1 : ll 1=202 : GOTO 3560 

3550 NEXT i 

3560 LOCATE xm , ym- 1 : PRINT CHR*(n1) 

::L0CATE xm,ym:PRINT CHR*(n1+1); 

3570 FOR f--1 TO 4 

3580 LOCATE xc , yc .-PRINT" "::yc = yc + 

1:L0CATE xc,yc:PRINT car-2*: 

3530 FOR g=1 TO 90.-NEXT g 



E xc,yc:PRINT " "; 

3620 RETURN 

3630 CLS81:PRINT 81," Ecrase 

par une voiture. • • " iPRINT 81," 

Quelle fin horrible !" 
3640 GOTO 4870 

3650 REM 

3660 REM ENTREE MAISONS 

3670 REM 

3680 eno=eno+1 

3630 IF entreeCenoX >1 THEN 3340 
3700 SOUND 1 ,500 

3710 LOCATE xm ,ym- 1 : PRINT" ";:L0CA 
TE xm,ym:PRINT" ": 

3720 IF TEST<xm»16-13,401-<ym- 2)*1 
6)=3 THEN xp=-1 ELSE xp=1 
3730 FOR i=1 TO 400 

3740 IF INKEY*=" " THEN FOR i=300 
TO 280 STEP -4:S0UND 1 , i , 5 , < i -276) 
/4,,,1:NEXT i :CLSB1 :PRINT 81, "Vous 
avez tue la seule personne qui 

pouvait vous aider. Vous avez per 
du.":G0T0 4870 
3750 NEXT 
3760 SOUND 1,500 

3770 LOCATE xmt xp,ym-2 :PRINT " ";: 
LOCATE xnn xp, ym-3 :PRINT " "; 
3780 LOCATE xm ,ym-2 : PRINT " ";:L0C 
ATE xm,ym- 3:PRINT " "; 
3730 LOCATE xm , ym- 1 : PRINT CHR*<212 
);:L0CATE xm,ym:PRINT CHR*<213) 
3800 trec=trec*1 

3810 IF trec=1 THEN CLS81 : PRINT81 , 
"Vous avez vendu la moitie des dia 
mants. Vous devez touver- un aLjtre 
acheteur . ":G0T0 3180 

3820 CLS81 :PRINT81 ,"Vous avez vend 
u tous vos diamants. Vous pouvez q 
uitter la v.i. I I e . " 
3830 FOR ic=3 TO xm STEP 2 
3840 LOCATE ic-2 , ym : PRINT " "; 
3850 LOCATE ic,ym: PRINT cav-4*::S0U 
ND 1 ,505,15,4, , ,10:F0R i=1 TO 100: 
NEXT i:NEXT ic 

3860 FOR i--1 TO 500 : NEXT : SOUiJC'i 1,1 
00:L0CATE xm ,ym 1 : PRINT " ";: 
3870 FOR ic=xm TO 39 
3880 LOCATE ic-2,ym :PRINT " "; 
3890 LOCATE ie,ym:PRINT car4*;:S0U 
ND 1 ,505, 15,4, , , 10:FOR i=1 TO 100: 
NEXT i 

3300 NEXT ic 
3910 scor e-scor e+2000 
3320 GOTO 42.40 
3930 REM 

3940 IF entree (eno)< >2 THEN 4160 
3350 IF TEST(xm*16-19,401-(yni-2>«-1 
6)=3 THEN xp=-1 ELSE xp=1 
3360 xb=xm :yb=ym-3 

3970 LOCATE xm,ym-2 : PRINT" ";:L0CA 
TE xb,yb:PRINT CHR*< 228 );: LOCATE x 
m+xp,ym-2:PRINT" ";:L0CATE xm+xp,y 
m-3: PRINT " ": 
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HEBDO RUNNER 



THOMSON T07,T07 70 



En ces temps magiques et recules, les grands pretres CEI- 
KAHALDI partaient cueillir sur les murs sacres d'HEIBDO- 
JIE les fleurs de LYSTING necessaires a leur culte. Mal- 
heureusement, les immateriels BEHINOAT, redoutables 
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monstres des murailles, veillaient jalousement sur ces plan- 
tes divines... 

Conception et realisation : Jean-Michel MASSON et Franck 
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SPECTRUM 

Suite de la page 4 ^kl 



2609 IF ATTR <d,C>«56 THEN 00 SU 
6 9900 

8610 IF ATTR ld,C)»16 THEN GO SU 
B 8008 _ 

2611 IF ATTR <d,C>»72 THEN PRINT 
AT 15,3; INK 2;"U";AT 0,0; "DE P 
ROFONDIS": GO SUB 8100: GO TO 88 
00 

8680 GO SUB 3700: GO SUB 84.00: B 
EEP .01,6: LET PP-PP + 1: GO TO 85 
80 

8993 IF X>«2 THEN LET X =X -8 : GO 
TO 8996 

8994 LET i«*S 

8996 IF y<»19 THEN LET y='j+2: GO 

TO 9500 
3998 LET y=y-2: GO TO 9500 
3009 LET t«»t«+8: GO SUB 6098: P 
APER 4: INK 0: CLS : PRINT AT 0, 
0; "ORSIS DU LION " 
3110 PRINT AT 8,88; "NO"; AT 3,8; 
PRPER 1; " "; PAPER 4.; " R 
"; PRPER 1;" "; PRPER 4;" N 
PO" 



3112 PRINT RT 4,1; 


PAPER 1;" 


"; PRPER 4; " 


"; PAPER 1; " 


■'; PAPER 4, " 


PO" 


3113 PRINT RT 5,8; 


PAPER 1; " 


"; PAPER 4; " 


'; PRPER l; " 


"; PAPER 4; " 


"; PAPER 1 


3114 PRINT RT 6,3; 


PAPER l; " 


; AT 6,88; " 


" 


3115 PRINT RT 7,13 


"NO "; PA 


PER 1;" 




3116 PRINT RT 8,0; 


•R R NO 


PO " ; PRPER 1; 


"; PAPER 


4.;" "; PAPER 1;" 




3117 PRINT RT 9,7, 


•PO 


; paper l;" "; 


PAPER 4; INK 


2;" o"; PAPER 1," 


" 


3118 PRINT RT 10,5 


"R NO 


" ; PAPER l;" 


"; PAPER 4.; " 


"; PAPER l; " 




3119 PRINT AT 11,2 


"R PO 


R "; PAPER 1; 




3120 PRINT AT 18,22; PAPER 1;" 



3121 PRINT AT 13,7; "NO NO 

"; PAPER 1:" 

3122 PRINT RT 14,1; "R "; PAPER 1 
... ... P flp ER 4, ; " p po 

"; PAPER 1;" 

3123 PRINT AT 16,8; PAPER 1;" 

"; PAPER 4; " "; PAPER 

1; " " ; PAPER 4 ; " R "; PAP 



ER l; " 

3184 PRINT RT 16,15; PAPER IS" 
"; PAPER 4;" NO "; PAPER 
; INK 6; "S "; INK 0; PAPER 3;" 
A" 

3125 PRINT RT 17,2; "R R 
PAPER 1; " "; PAPER 4; " 
PO"; PAPER 3) " R A" 

3126 PRINT AT 18,1; "R NO 
PAPER 1; " "; PAPER 4; 

PAPEA 3; " A" 



3127 PRINT AT 19,6; "PO 



PAPER 



l; " "; PAPER 4; 

NO"; PAPER 3; " " 

3128 PRINT RT 20,11; PRPER 1;" 
"; PAPER 4; " "; PAPER 1; " 

"; PAPER 4;" R PO"; PAPER 3;" 
A" 

3129 PRINT RT 21 , 0; "DESERT- >" ; P 
APER 7; " " 

3130 LET 1*9: LET k»16: PRINT OU 
ER l; PAPER 8; INK 8; AT l,k;"M" 

3134 LET U»0: GO SUB 8050: GO SU 
6 8550 

3135 IF 0«-l THEN GO TO 3600 
3140 GO SUB 8400 

3149 LET e=C:: GO SUB 9040: GO S 
UB 9030 

3150 PRINT OYER 1; PAPER 8; INK 
8; AT L,k;"M" 

3152 LET C=C+ <INKEY*»"I«" AND C < = 

30 AND ATTR id , C +1) < >8) - i INKEY* = 

"n" AND C>*0 AND ATTR id,C-l><>8 

) 

3155 LET d=d+<INKEY»»"a" AND d<* 

20 AND ATTR id +1 , C > < >8> - < INKEY«» 

"q" AND d>*3 AND ATTR ld-l,C><>8 

) 

3160 IF ATTR ld,C)»56 THEN GO TO 

3600 
3165 IF RTTR id,;) =24 THEN GO SU 
B 7000 

3171 IF INT <RND*2>=0 THEN GO TO 
3177 

3172 IF d<l AND ATTR U-i;k)<>8 
THEN LET 1=1-1 

3173 IF d>(. AND ATTR il+l,K)<>8 
THEN LET 1 = 1+1 

3174 IF Ok AND ATTR U,k + 1><>8 
THEN LET k=k+l 

3175 IF C<k AND ATTR H.,k-1)<>8 
THEN LET k=k-l 

3177 PRINT OUER 1; PAPER 8; INK 

3176 IF d = l RND c = k THEN PRINT I 
NK 8; AT 0,0; "MANGE PAR LE LION"; 
AT d,c;"U": GO SUB 8100: GO TO 8 
800 

3190 GO SUB 3700: GO SUB 8400: B 
EEP .01,5: LET PP.PP+1: GO TO 31 
40 

3503 LET t«»i.8+a GO SUB 6098: P 
APER 4: INK 0: CLS 

3504 PRINT AT 0,0; "OASIS DU REBE 
LLE" 

3505 PRINT AT 2,6; INK a;"CCCCCC 
CCCCCCCCC"; INK 0;" NO" 

3506 PRINT AT 3, 19;" A RR PO" 



3507 PRINT AT 4,1; PAPER 0;" 

"; PAPER 4; " NO "; P 
APER l;" "; PAPER 4;" NO" 

3508 PRINT AT 5,1; PAPER 0;" 

"; PAPER 4; " R PO A A "; P 
APER 1;" "; PAPER 4;" PO" 

3509 PRINT AT 6,1; PAPER 0;" 

"; PRPER 4; " A "; PA 

PER 1;" 

3510 PRINT AT 7,1; PAPER 0;" 

"; PAPER 4; " A "; P 

APER 1;" 

3511 PRINT AT 8,17; PAPER 1;" 

3512 PRINT AT 9,11;"R "; PAPE 
R l; " "; PRPER 4; " "; 
PAPER 1;" "; PRPER 4;"R" 

3513 PRINT RT 10,14; PAPER 1;" 

"; PAPER 4; INK 0; " R" 
; PAPER IS" 

3514 PRINT RT 11,14; PAPER 1;" 

"; PAPER 4; "R "; INK 2; " 
o"; INK 0;" "; PAPER 1;" "; PAP 
ER 4; " R" 

3515 PRINT AT 12,9; "R R "; PAPE 
R 1; " "; PAPER 4; "R "; 

PAPEA 1; " 

3516 PRINT RT 13,5; "R "; 
PAPER 1 ' " 

351? PRINT RT 14,14; PRPER 1; " 
PP,PER 4; "R" 

3518 PRINT RT 15,3; "NO 
PAPER 1: " " 

3519 PRINT AT 16,3; ' 
"; PAPER 1;" 

3520 PRINT AT 17,10; ' 
PER 1; " 

3521 PRINT AT 18 , IS 
R 1; " 
3582 PRINT AT 19,5; 

"; PAPER 1; " 
" NO" 

3523 PRINT AT 20,8; "PO R 
"; PAPER 1; " "; PAPER 4; " 

PO" 

3524 PRINT AT 21 , 0; "DESERT- >" ; P 
APER 7; " " 

3525 GO SUB 9000 

3526 LET U«0: GO SUB 8050: GO SU 
6 8600 

B ' lloo ft-14: LET er=14: GO SU 
3536 IF 0*-l THEN GO TO 2993 
2S. 3 7„ PRINT fiT »<0j INK a;"ATTENT 
ION AU REBELLE": GO SUB 9000 

3540 GO SUB 6400 

3541 IF INT <RND*a> »0 THEN GO TO 
3543 

3542 LET rt«r«+2: IF re >31 THEN 
LET r«»14 

3543 PRINT INK 1 ; AT 81,er;" ";AT 
21, re; "H": let er=re 

3549 LET e=C: GO SUB 9040: GO SU 
B 9030 

3 J! S ?Lk ET .,.$5 c+(INKEY *' 5 " l »" AND c< = 
30 AND ATTR id , C +1 ) OS) - i INKEY$i 
"n" AND c>=0 AND ATTR id,c-l)o8 



"R 


"; Pf 


"NO 


"; PAPE 


R 


NO PO 
; PAPER 4 



3555 LET d»d+ IINKEY*«"»" AND d<« 

80 AND ATTR id +1 , C ) <>8) - « INKEY* = 

"q" AND d>*3 AND ATTR (d-l,C)<>8 

) 

3560 IF ATTR (d,C)=S6 THEN GO TO 

3600 
3570 IF SCREEN* id,C)«"0" THEN P 
RINT AT 0,0; k$i2> ; " «st is 2« no 
t de i.a phrase magiquc" 
3580 GO SUB 3700: GO SUB 8400: B 
EEP .01,5: LET PP-PP+1 

3582 IF INT (RND*3) <>0 THEN 00 T 
3540 

3583 PLOT OUER 1; INK 8;8*i"e+4,7 
DRAU OUER 1; INK 8; , (21-d ) 48+ 

4: BEEP .005,50: PLOT OUER 1; IN 
K 3;8»re+4,7: DRAU OUER 1; INK 8 
; O, (21-d) *8+4 

3584 IF re.c THEN PRINT INK 2; AT 
d,c;"U";AT 0,0; "TUE PAR LE REBE 

LLC": GO SUB 8100: GO TO 8200 

3590 GO TO 3540 

3600 LET V>20*NJ: GO TO 2993 

3700 IF e>C THEN LET U«l: GO TO 

3705 

3702 LET U*0 

3705 GO SUB 8070: RETURN 

4005 PRINT RT 0,O;"UOUS ETES DAN 

S LE GRAND ERG": LET ea=2: 00 SU 

B S420: IF 0»-l THEN 00 TO 8200 

4100 GO TO 1046 

4310 LET JK-INT (RND*4) : IF JK»0 

THEN 00 TO 5000 
4410 CLS : PRINT AT 0,0; "MIRAGE" 
: 00 SUB 9000: GO TO 2993 
4702 PRINT AT 0,0; "SITE ARCHEOLO 
OIOUE": GO SUB 9020: 00 SUB 8350 
4718 IF 0=-l THEN GO TO 4398 
4716 LET qt=t 
4780 LET x»="statuettes": GO SUB 

4900 

4721 IF 0=-l THEN GO TO 8200 

4722 LET t*qt. : GO TO 4898 

4802 PRINT AT 0,0; "GISEMENT MINE 
RAL": GO SUB 9020: GO SUB 8350 
4812 IF 0*-l THEN GO TO 4898 
4816 LET qt*q 

4820 LET X$ = "q>jartZ" : GO SUB 490 
O 

4821 IF 0=-l THEN GO TO 820O 
4322 LET q=qt : GO TO 4898 

4898 LET 0=0: GO SUB 9040: LET X 
=x+l: GO TO 9500 

4900 LET c=0: LET d=4: PAPER 1: 
INK 2: FOR i=4 TO 21: PRINT AT i 

,0; " 

": NEXT i 



ASUIVRE... 



COPIEUR-PRO 






Dans un but bien evidemment non reprehensible, copiez 
sans vergogne vos "chores" cassettes... 



Gregoire GEMPP 




ORIC 



DE LA \>i$C\i&{0(4 




100 REM 



101 REM ! COPIEUR-PRO. GREGOIRE GEM 
PP! 

102 REM + 

— + 

103 CLS:TEXT:PAPER0:INK2:HIMEM#5FF 
F 

104 RESTORE :P0KE618, 10 

105 PRINT:PRINT"COPIEUR-PRO (6. GEM 
PP)" 

106 PRINT" " 

107 PRINT: PRINT" Ceci est un copi 
eur ma is avec des" 

108 PRINT" fonctions 'PRO'." 

109 PRINT:PRINT" Les fonctions (p 
resentent dans" 

110 PRINT" l'utilitaire meme) sont 
au nombre de 9" 

111 PRINT" Vous pouvez lire? copi 
er (sauvegar-" 

112 PRINT"der), verifier, un progr 
amme. " 

113 PRINT" Pour la verification, 
il y 3 messa-" 

114 PRINT'ges d'erreur :" 

115 PRINT" ERR 1 : erreur de code 
initial." 

116 PRINT" ERR 2 : erreur dans le 
t itre. " 

117 PRINT" ERR 3 : erreur dans le 
programme. " 

IIS PR I NT: PR I NT" Vous pouvez auss 
i mettre en mode" 

119 PRINT'auto, non-auto, fast, sl 
ow, et aussi" 

120 PRINT"redef inir (reecrire) le 
titre ! ! !" 

121 PRINT:PRINT" APPUYEZ SUR 'RET 
URN' POUR LA SUITE" 

122 GETA*:IFA*OCHR*(13)THEN122 

123 CLS:PRINT:PRINT"COPIEUR-PRO (G 
.GEMPP) " 

124 PRINT" " 

125 PRINT:PRINT" Pendant une lect 
ure, une copie, une" 

126 PRINT"verif ication, des lettre 
s peuvent" 

127 PRINT"s"af f icher.Elles corresp 
ondent a : " 

128 PRINT" R : Recherche d'un prog 
ramme. " 

129 PRINT" L : Lecture de ce progr 
amme. " 



130 PRINT" S : Sauvegarde du progr 
amme. " 

131 PRINT:PRINT" Pendant la lectu 
re d'un programme" 

132 PRINT" le titre, les codes de d 
ebut et f in, " 

133 PRINT'sont affiches dans un ta 
bleau.S'il est"; 

134 PRINT"en Auto ou pas aussi." 

135 PRINT:PRINT" De plus un compt 
eur en hexadecimal" 

136 PRINT" permettra de connaitre 1 
a longueur et" 

137 PRINT" le temps de patience pen 
dant un tra-" 

138 PRINT" vail ( lecture, copie,~veri 
f ication ) " 

139 PRINT:PRINT" APPUYEZ SUR 'RET 
URN' POUR LA SUITE" 

140 GETA*:IFA»OCHR*(13)THEN140 

141 CLS:PRINT:PRINT"C0PIEUR-PR0 <G 
.GEMPP)" ' 

142 PRINT" " 

143 PRINT:PRINT"IMP0RTANT : Consig 
nes a suivre. " 

144 PRINT" L'utilitaire devant oc 
cuper une zone" ; 

145 PR I NT "comprise entre #400 et # 
E50, permet-" 

146 PRINT'tant ainssi la copie de 
programme tres" ; 

147 PRINT'long, il faudra reloger 
celui-ci . " 

148 PRINT:PRINT" II sera reloge a 
partir de #6000. " 

149 PRINT"Un fois le chargement de 
codes effec-" 

150 PRINT"tue, une sauvegarde du p 
rogramme BASIC"; 

151 PRINT'ci contre est favorable. 

152 PRINT:PRINT" Ensuite un CALL# 
6000 permettra de" 

153 PRINT" loger def ini t i vement le 
copieur a sa" 

154 PRINT"place d'origine <#400-#E 
50). " 

155 PRINT: PRINT" Faire une sauveg 
arde en tapant :" 

156 PRINT"CSAVE"CHR*(34)"C0PIEUR-P 
R0 " CHR* ( 34 ) " , A#400, E#E50, AUTO" 

157 PR1NT:PRINT" ATTENTION : le B 
ASIC est detruit. " 

158 PRINT"Un CALL#400 fera demmarr 
er le copieur. " 



159 PRINT" APPUYEZ SUR 'RETURN' P 
OUR LA SUITE" 

160 GETA*: IFA* <>CHR*< 13)THEN160 

161 CLS:PRINT:PRINT"C0PIEUR-PR0 (G 
.GEMPP)" 

162 PRINT" " 

163 PRINT:PRINT" Patientez SVP, 1 
ecture des codes. " 

164 IFDEEK ( #FFFC ) =#F42DTHENCALL#F9 
60 : R=0ELSE C ALL#F9AA : R= 1 

165 READA*,B*:A=VAL("#"+A») :B=VAL( 
"#"+B«> :W=0=L=10003 

166 PL0T1+R,6, "Ligne en cours : "+ 
MID*(STR«(L),2):S=0 

167 READC*:IFLEN(C*)>2THEN170 

168 C=VAL("#"+C*> :P0KEA+W,C:S=S+C 

169 U=W+1: GOTO 167 

170 C=VAL("#"+C*> :IFSOCTHEN173 

171 L=L+2= IFA+W<=BTHEN166 

172 G0T0175 

173 IFDEEK ( #FFFC ) =#F42DTHENCALL#E8 
07ELSECALL#E940 

174 PRINT: PRINT: PRINT :PRINT"ERREUR 
EN LIGNE " ;L:END 

175 IFDEEK < #FFFC ) =#F42DTHENCALL#E8 
07ELSECALL#E940 

176 PING:PRINT:PRINT" Vous pouvez 
sauvegarder le programme" ; 

177 PRINT'BASIC ci-contre (dans le 
quel vous etes" ; 

178 PRINT'actuellement > en tapant 

179 PRINT"CSAVE"CHR*(34)"xxx"CHR»< 
34)", AUTO "; 

1B0 PRINT'si ce n'est deja fait."; 

181 PRINT:PRINT" Puis faite CALL# 
6000 et sauvegar dez" 

182 PRINT'1'utilitaire en tapant : 

183 PRINT"CSAVE"CHR*<34)"C0PIEUR-P 
RO" CHR* ( 34) " , A#400, E#E50, AUTO" 

184 PRINT'sans oublier que le prog 
ramme BASIC" 

185 PRINT"est detruit .Fai te alors 
CALL#400" 

186 PRINT:PRINT" A oui, l'utilita 
ire est entierement" 

187 PRINT'compatible sur 0RIC-1/AT 
MOS ! ! ! " 

188 P0KE#26A,3:END 

10000 REM <<< CODES MACHINES. >>> 

10001 REM -=-=-=-=-=-=-=-=-=-=-=- 

10002 DATA 6000, 6A80 

10003 DATA A9, 00,B5, 00, A9, 04,85,01 

10004 DATA 0261 



10005 


DATA 


10006 


DATA 


10007 


DATA 


10008 


DATA 


10009 


DATA 


10010 


DATA 


10011 


DATA 


10012 


DATA 


10013 


DATA 


10014 


DATA 


10015 


DATA 


10016 


DATA 


10017 


DATA 


10018 


DATA 


10019 


DATA 


10020 


DATA 


10O21 


DATA 


10022 


DATA 


10023 


DATA 


10024 


DATA 


10025 


DATA 


10026 


DATA 


10027 


DATA 


10028 


DATA 


10029 


DATA 


10030 


DATA 


10O31 


DATA 


10032 


DATA 


10033 


DATA 


10034 


DATA 


10035 


DATA 


10036 


DATA 


10037 


DATA 


1U038 


DATA 


10039 


DATA 


10040 


DATA 


10041 


DATA 


10042 


DATA 


10043 


DATA 


10044 


DATA 


10045 


DATA 


10046 


DATA 


10O47 


DATA 


10048 


DATA 


10O49 


DATA 


10050 


DATA 


10051 


DATA 


10052 


DATA 


10053 


DATA 


10054 


DATA 


10055 


DATA 


10056 


DATA 



A9, 30, 85, 02, A9, 60, 85, 03 

02F1 

AO, 00, PI, 02, 91, 00, E6, 02 

02 CC 

DO, 02, E6, 03, E6, 00, DO, 02 

0373 

E6,01,A5,00,C9,51,D0,E8 

045E 

A5,01,C9,0E,D0,E2,60,EA 

0479 

4C,7F,08,48,29,F0,4A,4A 

02C8 

4A,4A,A0,00,20, 16,04,68 

01D6 

29,0F,C8,4C, 16,04,48,38 

01E6 

E9,OA,90,04,68,69,06,48 

02A6 

68, 18,69,30,91,07,60,20 

0231 

30, E6, AO, 00, 85 , OB, A5 , 00 

02EB 

D0,0A,A5,0B,91,05,E6,05 

030B 

D0,02,E6,06,60,A0,00,B1 

036F 

05,20,C6,E5,4C,36,04,86 

02DC 

05, 84, 06, AD, 00, Bl, 05, C9 

02AE 

2E, DO, 01, 60, 18,69,80,91 

02F1 

05,C8,D0,F1,BD, 1D,BD, 18 

043D 

69,80,9D, 1D,BD,60,A9,0C 

0375 

8D,D5,BE, A9,08,8D, ID, BE 

0369 

A9,52,8D, 1E,BE,A0,0E,A9 

03B8 

20, 99, 78, ED, 88, DO, F8, 20 

045E 

CA, E6, 20, 96, E6, 20, 30, E6 

0482 

C9,24,D0,F9,A9,4C,8D, IE 

0456 

BE,A2,09,20,30,E6,9D,50 

038C 

08, CA, DO, F7, AD, 56, 08, DO 

0474 

0F,A9,4E,8D,5C,BD,8D,5E 

0397 

Suite page 29 



VIC 20 

Suite de la page 3 



963 

964 

965 

966 

5,25 

967 

968 

969 

970 

971 

4/22 

972 

7/22 



DRTR1,3,3,7,7,7,7,7 
BRTR7,7,7,7,7,7, 199, 199 
DRTR0 , 48 , 5 1 , 63 / 63 / 255 / 255 1 255 
DRTR223 , 255 , 255 / 255 , 255 , 255 / 25 

DRTR255 / 255 , 255 , 254 , , 9 , , 
DRTR255, 255, 255/ 7/ 7.. 7..7..7 
DRTR7,7/7/7..3.3/3/3 
DRTR7,15,31,6:?,63,63,63,1 
DflTfllZS/ 192/ 192/ 224/224, 224, 22 
4 

BRTR224 , 224 , 224 , 224 .. 224 , 224 , 22 
1 / 255 , 255 , 255 , 255 , 255 , 255 , 



973 BflTfiQ ,12/ 204 , 252 , 252 , 255 , 255 , 2 



255/ 255, 127/0,0,0,0 
255,255,224,224,224,; 



224,224,224, 192, 192, 19 



■240,248,25: 



252,25; 



,255, 255, 255, 25J 



255,25 



974 IIRTR255, 

975 DRTR255, 
4,224 

976 DRTR224, 
2, 192 

977 HRTR224, 
2 . 12° 

978 DRTR255 
5/255 

979 IIRTR0, 0, 24, 60/ 60/ 24, 0, 

1 000 GOSUB2300 ; OOSUF2330 : TE= 1 : CR= 1 
00 ■ VI=2 : GOSUB2560 : SC=0 : CCK>=0 

1005 P0KE36879,9 : PRINT"^WM»WMS«l!I)aS 

mtoik : ; 

1006 P0KE36874, : P0KE36875, : P0KE3 
6876/0:C<0)=0 

1010 PRINT"*, XO* l*-H Iff" 

1020 PR I NT "k. '<)»+/-./<•" 

1030 PR I NT "k CEltHMXt" 

1040 PR I NT "k QRSTUVWXVZ" 

1050 PRINT"k DEF<GHIJKL" 

1069 PR I NT "k CB MN" 

1870 PRINT"k QR OP"; 

1030 FORT=0TO22:POKE4108+T#22/61 N 

EXT: PR I NT "SI" 

1090 eETR$IFR*O"B"THEN1090 

1 1 00 P0KE36877 , 1 4 1 ■ P0KE36876 , 1 28 : C 

=-1 

1110 FORT=0TO22 : P0KE4 1 09+22*T , 6 1 : P 

0KE4 1 1 7+22*T , 61 : NEXT : GOTO 1 1 40 

1115 FORT=0TO22 i P0KE4 1 1 3+22#T , 32 : N 

EXT^ RETURN 

1 1 20 C=-C : I FO0THENGOSUB 1 1 1 5 > F0RT= 

0TO6 : P0KE4 1 1 3+88*T , 6 1 : P0KE4 1 35+88# 

T, 61 NEXT: RETURN 



1 1 30 I FCX0THENGOSUB 1115: FORT=0TO6 ■ 

P0KE4157+88#T,61 P0KE4179+88*T,61 : 

NEXT : RETURN 

1 1 40 FORT=0TO4-B i POKE4320+B*2 1+21* 

T, 68: NEXT 

1 1 50 FORT=0TO1 +2#B : P0KE4299+B*2 1 +T 

.. 69 : NEXT 

1 160 FORT=0TO4-B : P0KE4323+B*23+23* 

T/ 70: NEXT 

1 1 70 FORT=0TO9 : P0KE4272+T+B*22 , 32 : 

NEXT 

1 1 80 E=B+ 1 : F0RM= 1 T03 : GOSUB 1 1 20 : NEX 

T:IFB>4THEN1310 

1190 GOTO 11 40 

1310 PRINT"MW H II MW»«W I I 

"PRINT" 
1 320 P0KE36877 / : P0KE36876 , 1 76 : POK 
E36875, 176 :P0KE36874, 216 
1330 I30SUB1115 

1340 FORT=0TO21 :FORM=0TO7:POKE4131 
+M+22*T, 69 : NEXT i P0KE4131+8+22#T, 32 
1 350 FORN=0TO3 : P0KE4 1 09+22*T+N , 32 i 
NEXT : NEXT 

1^60 FORN=0TO8 : POKE4109+22*T+N, 32 : 
NEXT 

1364 R1=0 : Z=0 : X=0 : TT=0 : 2X=0 : XV=0 : R 
2=0 : U=0 

1365 fl=0 : B=0 : C=0 : D=0 ; E=0 : F=0 : G=0 ; H 
=0 : I =0 : J=0 : K=0 : L=0 : 11=0 : N=0 : 0=0 : P=0 
: 0=0 : R=0 : S=0 : T=0 

1 ?S6 009 IB2300 : GOSUB2330 : GOSUB2560 
1 370 D*8 ■ X*INT<RHD<1 >*3+21 ) 

1330 Z=INKRND< 1 >*8+l) : TT=0 

1390 TT=D/X 

1391 IFTT<6THENT1=97 : T2=98 : T3=99 

1392 IFTK3THENT1=32 : T2=96 : T3=32 

1393 IFTT>5THENT1=71 ; T2=72 : T3=73 

1399 P0KE4228+Z+D,T1 :P0KE4229+Z+D, 
T2:ROKE4230+Z+D,T3 

1400 P0KE4228+Z+D-X, 32 : P0KE4229+Z+ 
D-X , 32 : POKE4230+Z+E-X , 32 

1410 XV=1 GOTO 1550 

1420 n=n+x 

1425 TS=TS+2 

1 430 GOSUE2200 : GOSUE2400 ■ I FZX= 1 THE 

NZX=0:GOTO2100 

1440 POKE4118+O+Q,64:POKE4140+O+Q, 

65 : P0KE4 162+0+0, 66 ■ P0KE4184+0+Q, 67 

1 450 P0KE4 1 1 8+0+Q-22 , 32 : F0KE4 1 1 8+P 

+R, 62 : P0KE4140+P+R, 63 

1460 P0KE4118+P+R-22..32 

1 470 I F4 1 84+O+G+22>460 1 THENG0SUE23 

00 : S=0 

1 430 I F4 1 62+P+R+22O460 1 THENG0SUB23 

30 : U=0 

1490 Q=22*INTCS:> :S=S+.5 :R=22*INTCU 

):IJ=U+1 



1493 IFTS>300THENTS=0 : GOTO3000 

1494 I FCR=0THENV I =0 : GOTO2600 

1495 PRINT"*i«lOT«W«rtSflM«««H«W««OT«MM 
IMI" : SC J : PR I NT " 4»M»»>»»>I HI" 
;Cfl"ll " :CR=CR-2 

1496 TT=D/X 



2200 IFPEEK<:37152> = 119THENR1^R1 + 1 i 

R2=-l : G=G+1 : H=-l : G0T02235 

22 1 I FPEEK (. 37131 )■! 1 8THE"NR 1 =fl 1 +22 



:R2=-22: 1=1+22 



2220 I FPEEK < 37 1 5 1 ) = 1 1 0THENR 1 =fl 1 - 1 



T3=99 
T3=32 
T3=73 



1497 IFTT<6THENT1=97T2=98: 

1498 IFTT<3THENT1=32:T2=96: 

1 499 I FTT>5THENT 1=71 : T2=72 : 

1500 P0KE4228+Z+D,T1 P0KE4229+Z+D, 
T2 : POKE4230+Z+D, T3 

1510 P0KE4228+Z+D-X , 32 : P0KE4229+Z+ 

D-X, 32 i POKE4230+Z+D-X, 32 

1520 XV=0: GOTO 1550 

1530 D=D+X : GOSUE2200 : GOSUB2490 : IFZ 

X= 1 THENZX=0 : G0T02 1 00 

1540 GOTO 1390 

1550 E=PEEK(.4230+Z+D+X) :F=PEEK<422 

8+Z+D+X) : IFE=61THEN2050 

1 560 I FE032RNDE06 1 RNDX=23THEN205 



1570 IFEO32RNDEO61RNDX=22THEN260 



1 530 I FE032RNDE06 1 RNEX=2 1 THEN205 



1590 IFFO32RNDEO61RNDX=23THEN205 



1600 IFPEEK<4228+Z+D-10>=61 THEN205 



1610 I FF032RNDE06 1 RNDX=22THEN260 



1620 IFFO32RNDEC>61RNDX=21THEN205 



1630 I FF0-32RNDEO6 1 RNDX=23THEN205 



1634 IFTE=1THEN0E=95 

1636 IFTE=-1THEN0B=32 

1638 TE=-TE 

1640 IFXV=1THEN1420 

1650 IFXV=0THEN1530 

2050 P0KE4228+Z+D, 32 ■ P0KE4229+Z+D, 

32 : POKE4230+Z+D, 32 : GOTO 1370 

2100 SC=SC+100 

2110 P0KE4228+Z+D-22, 79 : P0KE4229+Z 

+D-22, 80 : POKE4230+Z+D-22, 81 : P0KE42 

28+Z+D..82 

2120 P0KE4229+Z+D, 83 : POKE4230+Z+D/ 

84 : P0KE4228+Z+D-44, 76 : P0KE4229+Z+E 

-44,77 

2 1 30 POKE4230+Z+D-44 , 78 

2 1 40 F0RT= 1 TO 1 00 : PQKE36877 , 220 ■ NEX 

T:POKE36877/0 

2 1 50 P0KE4228+Z+D / 32 : P0KE4229+Z+D , 

32POKE4230+Z+D/32 

2160 PRINT"i»l":FORT=0TO13: PRINT" 

":HEXT 
2170 GOTO 1370 



R2=1:G=G-1H=1 
2230 P0KE37154 
22THENRl=Rl-22 



J=-22 : 00T02; 



: G0T02235 

, 127: I FPEEK < 37151 >=1 

:R2=22: 1=1-22 :J=22 

2235 IF4229+Z+D=4141+I+GTHENZX=1 :R 

ETURH 

2240 I FPEEK < 4285+R 1 ) >6 1 RNDPEEK < 428 

5+R1 :X64THENGOSUE2280 : R=0 : U=0 

2250 I FPEEK < 4285+R 1 > >63RNHPEEK < 423 
5+RDC68THENGOSUB2290 : Q=0 ; S=0 

2251 IFI>14*22THENI=14#22:ftl=I+G 

2252 IFI<:iTHENI=22:Rl = I+G 

2253 1 FG>3THENG=8 : fl 1 =0+ I 

2254 IFG<0THENG=0R1=G+I 

2260 P0KE4235+R1 , OE i P0KE4285+R1+R2 

.•32 

2270 RETURN 

2280 SC=SC+50 ; GOSUE2500 : G0SUB2338 : 

RETURN 

2290 GOSUE25O0 : GOSUB2300 : Cfl=CR+ 1 00 

: RETURN 

2300 P0KE4 1 1 3+0+Q , 32 i P0KE4 1 40+0+Q , 

32 : P0KE4 1 62+0+G! , 32 < P0KE4 1 84+0+Q , 32 

POKE4096+O+Q/32 
2310 0=INT<RND?1)*7+14) : IF0=PTHEN2 
310 

2320 RETURN 

2330 P0KE4 1 1 8+P+R , 32 ■ P0KE4 1 40+P+R , 
32:POKE409S+P+R,32 
2340 P=INT(RND<1>*4+14>:IFP=0THEN2 
340 

2350 RETURN 

2400 P0KE4 1 1 8+ 1 , 74* P0KE4 1 1 8+ 1 + J , 32 
2410 POKE4097+G, 75 : POKE4097+G+H, 32 
2420 RETURN 

2500 P0KE4235+R 1 -23", 76 : P0KE4285+R 1 
-22, 77 : P0KE4285+R1-2'1 , 78 : P0KE4285+ 
fll-1,79 

2510 P0KE4285+R1 , 80 ■ P0KE4285+R1+1 , 
8 1 : P0KE4285+R 1 +2 1 , 82 : P0KE4285+R 1 +2 
2,83 

2515 P0KE4235+Rl+23,84 
2520 P0KE36877, 220 ; FORT=1TO500 : NEX 
T:POKE36377,0 

2530 P0KE4235+R1-23, 32 : P0KE4285+R1 
-22, 32 : P0KE4235+R1-21 .'32 : P0KE4235+ 
Rl-1/32 

2540 P0KE4285+R 1,32: P0KE4285+R 1 + 1 , 
32 : P0KE4285+R 1 +2 1 , 32 : P0KE4285+R 1 +2 
2/32 

Suite page 32 
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C'est nouveau, $a vient tie sortir 



DIM DOUM DAM, DOU DOU... 



Les logiciels musicaux ont tou- 
jours ste legion sur les micros. II 
y en avait de bons et de moins 
bons. Vous avez du bol, c'est un 
bon que je vous presents ce coup- 
ci I "The Music System" (yeah, 
yeah, tape, tape I) sorti des labo- 
ratoires Firebird exists et est beau. 
C'est pas une blague. Ce logiciel 
a tout les atouts d'un bon pro- 
gramme : presentation sympa, 
manuel complet, graphisme irre- 
prochabie et interet interessant. 
Bien sur, les logiciels musicaux 
deviennent vite tres complexes 
pour les neophytes et le moindre 
diese ou le plus petit bemol en 
effraieront plus d'un. Ah, c'est sur, 
si vous ne connaissez strictement 
rien en musique, vous risquez de 
vous heurter a quelques petits pro- 
blemes d'ordre technique. Atten- 
tion, ce n'est en aucun cas un soft 
destine a l'apprentissage musical, 
qu'on se le dise. Pas question de 
mettre un gosse de quatre ans et 
de lui dire : "apprends". II n'y arri- 
vera pas ou il mettra du temps. 
Nous avons eu deux versions de 
ce soft : une pour Commodore 64 
et une pour Amstrad. La version 
C64 propose un menu general 
dans lequel on pout distinguer six 
options : une pour creer voire 
musique sur une portee, une pour 
en faire autant sur un petit clavier 
reproduit a I'ecran, un synthe pour 
modifier le son sur chaque canal, 



un linker pour gerer tout ce que 
vous faites avec le disque, une 
option pour editor vos partitions 




sur imprimante et une autre pour 
gerer une eventuelle interface 
Midi. 

Tout fonctionne grace a un 
systems d'icones et est com- 
mando a partir du clavier. Quel- 
ques morceaux sont deja enregis- 
tres sur la disquette ainsi que quel- 
ques sonorites, a partir de la, c'est 
a vous de jouer I Creez vos instru- 
ments, vos musiques, vos sons, 
eclatez-vous. 
Sur r Amstrad. les choses sont 



beaucoup moins droles et sont 
surtout susceptibles d'en gonfler 
plus d'un. Deja, au lieu d'avoir un 
menu avec six options au choix, 
tout le soft est base sur un seul 
ecran tres fourni proposant plu- 
sieurs fonctions. Vous avez droit 
a un petit clavier en bas de I'ecran, 
une portee au milieu, un panneau 
de controls des voies sur le cote 
et quelques gadgets tout autour. 
La realisation est beaucoup plus 
lourde que celle du Commodore 
qui malgre les temps d'attente 
entre les parties vaut sacrement le 
coup. II faut tout de msme faire 
remarquer qu'un logiciel de musi- 
que sur Amstrad etait des le 
depart un pari difficile a tenir. 
Disons que la version Commodore 
est comparable a son niveau a un 
programme du genre de Music 
Studio sur Atari ST d'autant plus 
que ces possibilites au niveau de 
1'interface Midi ne sont pas negli- 
geables, possibilites que Ton ne 
retrouve pas sur I Amstrad. 
Petit detail qui a son importance : 
le soft sur Commodore est vendu 
avec Lenslock, le seul systeme de 
protection repertorie par I'Afnor 
comme : "bordel de merde". La 
foule en delire a qui on a deja fait 
le coup connait Lenslock depuis 
son premier jour. Clignez d'un ceil , 
levez un bras, tapez dans les 
mains et dites deux lettres. Si vous 
vous plantez trois fois, retour a la 
case depart et rechargement du 
programme obligatoire. Ave ! 
A voir done, The Music System 
de Firebird sur Commodore 64 et 
Amstrad. 



POURQUOI ? 

HEIN, POURQUOI ? 



Oh, que c'est nul I Oh, que c'est 
lamentable I Mon dieu I Ca 
m'effraie. lis ont ose aller si loin 
dans le nullissime, dans le mina- 
ble, comment ont-ils fait ? J'aime- 
rais bien qu'on m'explique com- 
ment des gens civilises, raisonna- 
bles, senses ont pu creer une 
merde comme Front Line de Chez 
Electric Software. J'ai peur que les 
enfants en bas age soient heurtes 
par la rudesse d'un logiciel, que 



dis-je, d'un msrdiciel de ce genre. 
Comment puis-je vous decrire 
cette immondice ? C'est une mil- 
lieme copie de Commando, ratee 
comme toutes les copies baclees, 
pourvue d'une animation sacca- 
dic qui fait mal aux yeux de 
degout, une presentation inexis- 
tante et un interet mesquin. Pen- 
ser que ce programme a une quel- 
conque valeur serait une erreur 
irreparable. 



courier 

&*% ceHe \ 

pi/8 POl/f 
AMI **M , 



Allez, je n'en dirai pas plus, 
n'achetez pas Front Line de chez 
Electric Software pour MSX si 
vous voulez rester a I'etat d'etre 
humain. 



MON DIEU 
QUELLE HORREUR 



Je savais que certains program- 
meurs n'avaient pas peur du ridi- 
cule, d'autant que ca ne tue per- 
sonne. Firebird vient de faire la 
demonstration qu'un editeur peut 
se planter completement avec un 
logiciel lorsque Ton voit'tourner 
Costa Caper*. Dans ce jeu 
d'arcade, au scenario pomps mot 
pour mot a Terrormolinos de Mel- 
bourne House, vous devez recu- 
peret un appareil de photo, partir 



en Espagne, prendre une ving- 
taine d'images et porter la pellicule 
chez un developpeur. Deja, I'idee 
de faire un jeu d'arcade d'un 
excellent jeu d'aventure paraft 
assez risquee. Malgre tout, les 
programmeurs se sont lances 
dans I'aventure (sic I) et se sont 
plantes en beauts ! Les decors 
sont moches, le personnage ridi- 
culement petit, maladroit et mal 
anime, les couleurs atroces. Vous 




pouvez vraiment cracher sur ce 
produit et vous consoler avec 
Runestone du meme editeur si 
vous avez envie de lui donner 
votre argent. Costa Caper* de 
Firebird pour Spectrum et 
Amstrad. 



AMSTRAD EST 
DANS LA MERDE 



syirs o& y=* 
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Sinclair avait tout prevu pour son 
Spectrum 128. II devait etre plus 
beau que le Spectrum + , il devait 
avoir 128 Ko, il devait avoir plus 
d'interfaces et des possibilites 



d'extensions plus importantes. 
Pour couronner le tout, il devait 
etre compatible avec le 
Spectrum + . C'est la que le bat 
btesse : 71 softs, au moins ne tour- 



nent pas sur le 1 28. Our I En voici 
25 : Alien 8, Elite, Enigma Force, 
Fairlight, Four Adventures, 
Hypersports, Impossible Mission, 
Knight Lore, Movie, Laser Compi- 
ler, Macadam Bumper, Nick 
Faldo's Open, Nightshade, Now 
Games, Now Games 2, Steve 
Davis Snooker, Spitfire 40, Swords 
and Sorcery, Their Finest Hour, 
They Sold a Million, Think !, Toma- 
hawk, Wateloo, Winter Games et 
The Way of the Tiger. II y a de quoi 
baliser, non ? Parmi ces softs, on 
notera ... hum. Bon, bref, ce sont 
les meilleurs disponibles sur Spec- 
trum. C'est tonton Sugar le Mickey 
qui ne va pas etre content : il a 
rachete un bateau en train de cou- 
ler et tous les jours on decouvre 
un trou de plus dans la coque I 



VROOOOOOOOM 



Et un nouveau compatible PC, un. 
Cette fois-ci, c'est LASER qui 
ajoute a sa gamme le modele 
TURBO. Le 8088-2 qui anime ses 
sntrailles tourne gentiment a 4,77 
Mghz et pousse des pointes a 8 
Mghz des qu'on appuie sur le 
champignon. La configuration 
standard de ce nouveau modele 
comprend I'unite centrale avec 
une caisse en ferraille pas trop 
moche, 51 2 Ko de Ram extensible 
a 640 Ko, une carte multifonction 
avec deux ports serie, un port 



parallels, un port joystick, une hor- 
loge, un calendrier, un multicon- 
troleur de disquette, un controleur 
de systeme de sauvegarde, un 
disque virtual par soft, une 
memoire tampon d'imprimante par 
soft, un clavier azerty, une carte 
video, deux lecteurs de disquettes 
360 Ko, un DOS microsoft 3.1 , un 
manuel en francais et un moniteur 
couleur. Le tout est garanti un an 
et coOte 19.000 balles TTC. Pas 
mal, non ? Si vous vous foutez de 
la couleur, le LASER Turbo 




monochrome est a 15.000 balles. 
Pour finir, un petit disque dur de 
20 megas pour les devoreurs 
d ' octets ? 10.000 balles a un 
chouTa pre* I 



GRAND PANARD 



Les branches des jeux de rftle qui 
trouvent que les versions informa- 
tiques de Donjons et Dragon tour- 
nant sur micro sont completement 
nulles peuyent se rassurer. Depuis 
quelques jours, les petits Anglais 
s'eclatent comme des fous sur le 
premier MUD a avoir vu le jour en 
ce bas monde. MUD ? Ca veut 
dire Multi User Dungeon, autre- 
ment dit : cent joueurs peuvent se 
connecter simultanement sur 
I'ordinateur central et se mettre 
sur la gueule, conclure des allian- 
ces, gagner des tresors... La 
dizaine de programmeurs a mis 
plus d'un an a programmer son 
bestiau, un Vax 750 (un monstre 
du style : "il faut un pavilion de 
banlieue entier pour la becane et 
le garage pour mettre la batterie 
de disques durs"). Voila un bon 
debut dans le domains du jeu reel- 
lement interactif et multijoueur . 



O&sPto 
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Vrvement le lancement du DUM en 
France (Donjon a Utilisateurs 
Multiples). 



NIVARNA 
NIVERNAIS 

( DEWS PAM$ 



( 




Nivernais, Nivernaise, au lieu de 
vous radasser dans voire lit douil- 
let le mercredi matin, branchez- 
vous sur Radio 58 FM. Claude, 
Daniel et Didier vous y cause 
d'intarmatique, rien que d'informa- 
tique dans une emission au titre 
original : MICRO 58. Ca se passe 
sur 94.5 et comme il cause de 
nous dans le posts, on renvoie 
I'ascenseur. 



PAS TROP 

VITE LE 

MATIN... 



Les Beiges ont attendu jusqu'au 
debut du mois de mars pour avoir 
leur reseau Videotex. Maintenant 
qu'ils I'ont obtenu, on commence 
a savoir sur quelle* normes se 
sont bases nos voisins beiges. 
Contrairement a nous Francais, 
les penseurs idealistes, la norme 
retenue est I'anglaise Prestel, 




compatible avec les normes ita- 
lienne, allemande, neeriandaise... 
mais pas francaise I Deuxieme 
point fondamental, la RTT (les PTT 
locaux) ne s'occupe que de la 
transmission des donnees 
(comme le fait Transpac) et 
n'ouvrira pas de centre serveur. 
Ceux-ci seront agrees par une 
bolts nommee Mediatel, filiate de 
trois autres societes, mais 
n'entrons pas dans le detail. En 
ciair, tant que la France restera sur 
sa norme Minitel exclusive, les 
pros du 1200/75 n'auront pas le 
plaisir de visiter les banques de 
donnees beiges autrement que 
par le biais d'un modem, pas d'un 
minitel. Vivement octobre que la 
norme francaise change (date pre- 
vue pour le passage en norme 
ASCII des minitels) I 



Et meme completement dement. 
Jugez plutot : s'appuyant sur un 
article paru dans le numero 123 de 
I'HHHHebdo, IBM tient a rappeler 
que, contrairement a nos affirma- 
tions, "le BIOS (Basic Input Out- 
put System) de I'ordinateur per- 
sonnel IBM est protege par la 
legislation sur les droits d'auteur. 
Toute duplication serait done par- 
faitement illegale et constituerait 
une contrefacon de droit 



d'auteur". Nous voulons bien 
croire que le BIOS est protege, 
mais la protection n'a pas I'air bien 
fameuse quand on voit les dizai- 
ne* de compatibles IBM qui trat- 
nent sur le marche. Et si ce 
systeme d'exploitation est effecti- 
vemsnt protege, il Test en tout cas 
moins bien que celui d'Apple qui, 
lui, a reussi a bloqusr les imita- 
tions de ses Apple II. Ne nous piai- 
gnons pas, IBM nous ecrit pour la 
premiere fois, nous sommes con- 
tent quand meme. 
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C'est nouveau, pa Went de sortir 




T aisez-vous, bande de jobastres ! 
Vous voyez pas que I'ennemi est 
au-dessus de nous, juste au- 
dessus 7 Si jamais I'un d'entre 
vous fait du boucan, je le fous aux 
fers, compris 7 

Non mais sans dec, hein ! C'est 
moi le commandant de ce foutu 
rafiot, oui ou prout 7 Comment 7 
Hein 7 Je ne suis pas plus com- 
mandant que ma sceur n'est la fille 



ffl&> V $& 




....M/arll Submarine Action 
Excltlng^o'S^aclflcll 



du pape 7 Dur. Pourquoi me jeter 
ainsi la verite au visage ? Saiauds, 
bande de saiauds. Bon, ok, 
j'accepte, c'est vrai, je ne suis pas 
le commandant de ce sous-marin, 
je ne suis que le pauvre joueur 
malheureux enfonce dans une 
situation fort complexe au fin fond 
de Silent Service, le dernier soft de 
simulation sous-marine de 
Microprose. 

Une fois de plus, les concepteurs 
de cette simulation n'ont pas 
oublie les petits details et les aleas 
de ce qu'ils simulaient. Ainsi, 
apres avoir choisi votre rang dans 
I'equipage (moussaillon, lieute- 
nant, commandant...) et apres 
avoir fixe i'etat du vaisseau, vous 
pouvez commencer a vous pren- 
dre pour un marin. Avec une ving- 
taine de commandes au clavier et 
I' utilisation d'un joystick, vous etes 
cense controler la bete sans 
aucun probleme. Enfin. , apres 
quelques seances d'entrainement, 
bien sQr I 

La realisation de ce foutu soft est 
excellente. I utilisation peut parat- 
tre inaccessible les premiers 
temps mais devient rapidement 
plus claire avec I 'habitude. 
Un tres bon plan done que ce 
Silent Service de Microprose sur 
Commodore 64. 



MUSICOS, 
ON SOLDE ! 



Vous revez de bncoler de la 
ziquette le dimanche sur un 
synthe pas trop pourri et qui trim- 
bale un logo de marque qui en 
jette plein la vue 7 Vous avez le 
cftoix I Sort vous etes riche et vous 
claquez votre thune dans un DX 
21 de Yamaha (6500 balles), soit 



A propos de cet UCN01, I'impor- 
tateur Yamaha n'a jamais eu le 
courage de le faire rentrer en 
France. Du coup, des revendeurs 
com me Videotroc se sort vus obli- 
ges de faire I'imporlation du mate- 
riel eux-memes pour connecter le 
synthe et le clavier sur n'importe 




vous achetez un MSX a 1000 bal- 
les et vous I'equipez avec le kit 
musique de Videotroc. Que je 
vous explique de quoi il retourne. 

Pour 1690 francs vous vous 
retrouvez a la tete d'un ensemble 
comprenant un clavier musical de 
trois octaves et demie (YA01), une 
unite de synthase (SFK01) et un 
adapteur standard MSX (UCN01), 
qui va dans un des ports cartou- 
che de votre micro. 



quel MSX, au lieu de limiter son 
utilisation au seul MSX Yamaha. 
Les capacites du SFK01 valent lar- 
gement cedes du DX 21. Alors, 
vous hesitez encore 7 Avec le 
MSX, vous pourrez en plus jouer 
a Eggerland Mystery ou a Roller- 
ball. Faites les comptes, pour la 
difference entre MSX equips et DX 
21, vous aurez encore de quoi 
vous acheter un lecteur de dis- 
quettes pour sauvegarder vos 
compositions I 



TOUJOURS PLUS FORT ! 



Mon dieu ! Vous vous souvenez 
de I'article de la semaine derniere 
sur Amiga ? On y disait que Com- 
modore France n'etait grosso 
modo qu'un tas de gens pas tres 
balezes et qui ne pissait pas tres 
tres loin, e'est-a-dire juste ce qu'il 
faut pour gaver la presse de petits 
fours. Done, lors de cette confe- 
rence de presse, personne n'avait 
reussi a connaltre le prix de la 
becane et ce une semaine avant 
sa sortie. Avouez que I' affaire etait 
pulpeuse I Done, une semaine 
plus tard on nous communique le 
prix: 19.331,80 francs. Argkl I 
Voila qui decoiffe, comme dirait 
I'autre 

Encore plus dur pour nos amis 
francais de Commodore, quelques 
minutes apres I'annonce du prix, 
on apprenait la promotion ameri- 
caine pour I'Amiga valable 
jusqu'au 31 mai. Attention les 
yeux: 1.295 dollars soit 9.712 
francs (un dollar coOtant a peu de 
choses pres 7,5 francs). La version 
americaine est strictement la 
meme que la version francaise 
excepte 256 Ko en plus (pour les 
francais) et I'adaptation au courant 
(220 volts, 50 Hz). On peut done 
dire que pour le moment la diffe- 
rence du prix d'un Amiga en 
France et d'un Amiga aux States 
varie du simple au double : un 
record dans la categorie "plus 
Cher que moi tu meurs". 
Inutile de dire que nous ne pou- 








vons que conseiltor aux eventuels 
acheteurs de cette becane de 
s'abstenir pour le moment. En 
effet, Commodore France finira 
bien tot ou tard par baisser ses 
prix. S'ils ne le font pas rapide- 
ment, c'est qu'ils ont un peu trop 
tendance a se sucrer au passage. 
A vous de conclure. 






TU VEUX DU BATON ? 



La perche est tendue par Mannes- 
mann Tally, sponsor officiel de 
I'equipe de France dathletisme 
pour les championnats d'Europe 
86 et les Jeux Olympiques de 88. 

Grace a ce financement des ath- 
letes, Mannesmann a organise 



sur le parvis de la Defense. Le 
mercredi 16, les sportifs vont plai- 
der en favour des i mpri mantes en 
bondissant comme des lapins au- 
dessus des haies et des barres de 
saut a la perche. Ca ne vaut pas 
les lancements de jeux comme 
Summergames aux USA (le meil- 




Ti AjAMA.*^ 

er uaj dA^ewT 
ce^-la.' / 




une exhibition des perchistes Qui 
non et Vigneron et du coureur 
Canstan lors du Sicob Printemps 



leur sportif pour chaque discipline 
etait present sur le stand d'Epyx), 
mais c'est quand meme pas mal. 



SILVER, 

Y A VEUT DIRE CACA ? 



La collection de logicieis Super 
Silver de Firebird porte bien mal 
son nom I Au lieu de regrouper 
des logicieis de bonne qualite, on 
y retrouve de sombres productions 
comme Microcosm, un pro- 
gramme adapte sur Commodore 
64 a partir d un BBC I Vous diri- 
gez un jardinier du futur (il peut 
leviter par exemple) qui doit faire 
pousser des plantes style philo- 
dendron en eliminant les parasites 
qui pullulent dans sa serre. Dans 
ce jeu au graphisme pauvre et a 
la musique sinistra, vous devrez 
faire preuve d'un courage et d'une 
abnegation sans borne si vous 
souhaitez franchir victorieusement 
les premiers tableaux. Ce genre 
d'arcade, nous le croyions disparu 
depuis bien des mois sinon des 
annees. Lorsque nous voyons que 
des programmes aussi lamenta- 
btes voient encore le jour en 1986, 
il ne nous reste plus qu'une chose 



a faire : hurler a la mort ! Micro- 
cosm de Firebird pour Commo- 
dore 64. 




MINI 

MIRE LA BOURSE OU LA VIE 



C'est sur les PTT que je vais baver 
mon fiel immonde cette semaine, 
les PTT et leur philosophie en gene- 
ral, les PTT et leur tres particulier 
sens du commerce, les PTT et tout 
ce que le mot "administration" peut 
comprendre de negatif. 
Remarquez, ce n'est pas la pre- 
miere fois que je me tue le bulbe a 
essayer de gueuler contre eux. Non, 
j'ai deja ecrit a mon agence com- 
merciale, je me suis deja heurte a 
la betise administrative et bureau- 
cratique et meme si je n'avais pas 
moi-meme tate de ce lamentable 
esprit mediocre, j'aurais eu large- 
ment de quoi foumir une polemique 
en puisant autour de moi des exem- 
ptes concrets d'individus s'etant fait 
betement "couillonner" et ne pou 
vant pas repondre. 
Tenez, par exemple : vous avez 
accepts de prendre un minitel Chez 
vous apres avoir ete victime des 
publicites racoleuses et autres 
attrape-cons des PTT. Jusque-la 
tout va bien. Vous arrivez a votre 
agence commerciale, tout est 
impeccable, vous repartez avec 
votre engin dans un grand sac signe 
de la griffe "teleboutique". Une fois 
a la maison, vous branchez I'appa- 
reil et vous essayez de tapoter quel- 
ques minutes. Le systeme ayant ete 
vite assimile, vous commencez par 
vous connecter sur le Teletel 3 et 
vous tapez un quelconque SM ou 
IOP Au bout d'une heure, soit un 
peu plus de 60 francs de connexion, 
ce petit jeu vous prend la tete, vous 
debranchez tous les fils et vous 
balancez lourdement le minitel au 
fond d'une armoire d'ou il ne sortira 
pas jusqu'a ... jusqu'a ce que les 
peripeties commencent. 
En effet, deux mois plus tard, la fac- 
ture arrive. Vous ouvrez delicate- 
ment I'enveloppe en vous deman- 
dant si vous depasserez les 554 
francs du bimestre precedent. Vos 
yeux tombent en bas de la feuille et 
apercoivent la somme : 5.459,83 
francs I Et allez done I C'est une 
erreur, ga ne peut pas etre autre 
chose. Quelqu'un vous a fait une 
mauvaise farce. 

Le lendemain, vous vous pointez a 
votre fameuse agence commerciale 
et au bout de quelques petites demi- 
heures d'attente, vous expliquez 
votre probleme. 



-Voila, je ne comprends pas, j'ai 

recu ma tact u re hier et j'ai pres de 

10 fois ce que j'avais a celle d'avant. 

Je ne comprends pas, il doit y avoir 

une erreur. 

•Ah, monsieur, voyons. Ce n'est pas 

raisonnable Vous savez bien que le 

minitel coute cher, vous etes adufle, 

voyons... 

-Le minitel 7 Quel minitel 7 Je n'ai 

pas ouvert mon minitel plus de deux 

fois depuis que je suis venu le cher- 

cher ici I Elle est bonne, celle-la, 

mon minitel ! 

-Allons, vous n'etes pas le premier 

a venir nous faire le coup I On en 

voit toute la journee des petits 

malins qui se croient supeneurs aux 

autres. 



morceau de I' affaire, I'individu vous 
declare : "de toute maniere, vous 
serez perdant". 

Incroyable I Et c'est veridique I La 
scene s'esf effectivement produite 
dans une agence parisienne I Et le 
pire. le plus enorme, c'est que ce 
directeur avait raia on : on ne gagne 
rien contre les PTT, qui que Ton soit, 
quels que soient notre bonne foi et 
nos arguments. C'est un fait. 

Dans cette affaire, qui j'en suis sur 
pourrait servir de modele a des 
dizaines du meme genre dans tout 
le pays, un certain nombre de (aits 
doivent etre denonces. Pourquoi 
quand quelqu'un se plaint ou con- 
tests sa facture, ce qui lui est tout 
a fait permis, pourquoi doit-il se 
heurter a une multitude d'individus 
charges de le decourager dans ses 
investigations 7 Pourquoi a partir du 
moment oil quelqu'un accepte de 
prendre un minitel, devient-il un vil 
escroc essayant de payer le moins 
possible 7 Pourquoi un possesseur 
I i a 




La demoiselle, au demeurant char- 
mante, commence a vous prendre 
la tete. Comme vous etes d'un natu- 
ral nerveux et que les sous-fifres 
vous gonflent, vous reclamez le 
directeur de r agence. Apres moul- 
tes etapes et apres avoir provoque 
un petit attroupement de badeaux 
attires par vos hurtements ("mais 
c'est incroyable I Lachez-moi avec 
votre minitel I"), vous finissez par 
vous expliquer avec ce qu'il y a de 
plus "responsable" dans toute 
I'agence Et la, vous apprenez la 
grande nouvelle de I'annee, le gros 



de minitel devrait-il forcement le 
connecter sur Teletel 3 et y vider 
son portefeuille 7 Les PTT ne 
connaissent-ils done pas I'existence 
des multiples RTC multivoies et les 
microserveurs 7 

Pourquoi les cas de tact ures contes- 
tees se multiplient-ils de jour en 
jour 7 Pourquoi I'inlormation en ce 
qui concerne la tarification kiosque 
ou T3 n'est-elle pas faite avec 
autant "d'ardeur" que I'existence 
meme du service qui est, lui, large- 
ment vante et largement 
promotionne 7 



Encore, nous aurions a faire a une 
societe nor male, comme les autres, 
le probleme ne serait pas le meme. 
Si votre livreur de couscous vous 
Ifvre 2 couscous par semaine et 
vous en facture 16, vous pouvez 
vous defendre. Ce n'est pas le cas 
avec les PTT. En effet, la seule 
preuve de la livraison effective du 
service (la communication), ce sont 
les PTT qui la possedent. La seule 
possibilite de verification de I'utili- 
sation que vous faites de ce service 
(compteurs de taxe, factures detail- 
lees), ce sont les PTT qui vous la 
foumissent, quelle que soit votre 
position, vous etes dependant des 
PTT! 

Tout cela existe, tous ces faits sont 
la. Etait-il necessaire d'en rajouter ? 
Car ils ont ete encore plus loin que 
ca; ils ont fait plus fort I et de toute 
facon, le pire de tout, c'est que les 
PTT ne sont tenu de prouver votre 
consommation en aucun cas I 
Depuis quelque temps (apres le 16 
mars au moins), une note circule 
dans toutes les agences commer- 
ciales autorisant les PTT a coupe' 
carrement toutes les lignes faisant 
1'objet d'une procedure d'appel a la 
suite d'une contestation. C'est-a- 
dire que si vous avez contests votre 
facture, qu'une premiere conclusion 
a ete emise contre vous et que vous 
avez fait appel, si vous possedez un 
minitel, les PTT ont le droit de cou- 
per votre ligne. Et la justice la- 
dedans 7 Pensez done ! C etait 
pourtant bien clair , les PTT ne peu 
vent pas couper une ligne telepho- 
nique avant que le stsde final de la 
procedure d'appel ne soit attaint. 
Resultat : on s'est foutu de notre 
gueule une fois de plus I Des dizai- 
nes de gens se retrouvent avec 
I'umque possibilite de payer leur 
facture oubliant ainsi leur proces et 
la contestation qu'ils avaient faite. 
C'est un peu comme si, dans une 
affaire criminelle, un condamne a 
mort ayant fait appel etait guillotine 
avant le resultat parce que "sure- 
ment coupable" I Le plus drole. 
c'est que seulement les posses- 
seurs de minitels sont susceptibles 
d'etre prtves de ligne. 
II y a un nom que tout le monde con- 
naissait et qui etait synonyms 
d'"arnaque" : Longuet, Gerard 
Longuet. 

Cette semaine, pas de code mais du 
mspris face a une administration 
orgueilleuse et voleuse qui une fois 
de plus ne repondra pas et qui res 
tera sourde dsvant est article 
comme devant les dizaines 
d'escroques. 

Escapeneufge 
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C'est nouveau, ca vient de sortir 






MERDE, BON DIEU ! 



J'ai un problems pour ecrire cet 
article. Oh, vous foutez pas de ma 
gueule, hein, ca peut arriver a tout 
le monde. Voila, Je vous exptique : 
il y avait il y a quelque temps un 
feuilleton a la television realise 
avec des marionnettes De ce 
feuilleton. Firebird vient de faire un 
logiciel, "Thunderbirds", or je me 
rappelle parfaitement de cette 
serie qui passait a la tele il y a 
quelque temps pendant les emis- 
sions pour enfant mais je n'arrive 
pas a me rappeter de son titre fran- 
cais. Le plus drole c'est que tout 
le monde, ici a I'HHHebdo est 
dans le meme cas que moi : pas 
moyen de se souvenir du 
titre (NDLR : Faux. Je me le rap- 
pelle Ires bien mais je le dirais 
pas). 

C'est dommage parce que I' adap- 
tation ludique (bien dit, non ?) est 
fort sympathique : petite synthase 
de parole pendant la presentation, 
graphismes mignons tout plain, 
musique tiree de la serie televises 
et jeu riche en surprises. 
Vous dirigez deux petits vaisseaux 
paumes dans un labyrinthe. La 
doc du programme dit que c'est 
une tombe egyptienne, moi 
j'appeMe ca un labyrinthe, un point 
c'est tout. Tout le jeu est base sur 
le fait qu'un vaisseau est plus petit 
que I'autre et done passe dans 




certains endroits oil I'autre ne peut 
pas se faufiler. En usant de ruses 
dignes des sioux les plus malins, 
vous devez mener ces deux appa- 
reils tout droit dans la tombe du 
pharaon Jesaisplustropquoi pour 
delivrer une equips d'egyptolo- 
gues prisonniers. 
Un gros plus pour ce logiciel qui 
m'en a fait voir de belles et dont 
je ne me suis toujours pas lasse. 
Votez Thunderbirds de Firebird 
pour C64. 



MATEZ LA BIBLE 
DUST 



Mazeu ! Regardez comma alia est 
belle I Vous Tavez vue ? Bardee 
de Gris, de rouge et de noir.le tout 
sur fond blanc, quelle classe ! 
C'est la Bible de I Atari ST, oui 
messieurs dames I C'est tout ce 
qu'il y a de plus veridique : elle 
vient de sortir chez votre boucher 
habituel. Je vous vois d'ici vous 
repandre sur le sol humide de 
votre salle de bain. Essayez de 
vous retenir, merde I Attendez un 
peu que je vous dise ce qu'il y a 
dedans. Tiens, c'est vrai ca, j'y 
pense maintenant. Qu'est-ce qu'il 
y a dedans ? 

Pour une fois, franchement, je 
crois que les possesseurs de ST 
vont etre satisfaits ! Non mais 
regardez-moi ga ! Deja, aux 76 
premieres pages, on comprend 
que ce bouquin n'est pas reserve 
a n'importe quel grouillot en mal 
de programmation. Je dois avouer 
que la premiere description des 
circuits de la becane est tout a fait 
excitante, surtout quand on n'y 
pige que dalle ! La suite des eve- 
nements est beaucoup plus alle- 
chante. Non mais matez-moi ca ! 
Description des interlaces particu- 
lierement soignee, agrementee de 
superbes petits dessins fort agrea- 
bles. Tout y est, la souris, le cla- 
vier, le moniteur, la RS232, 1'mter- 
face MIDI, les cartouches, I'inter- 
face DMA et celle des unites de 
disquettes. Bref, si apres avoir lu 
ces chapitres, voush'avez pas bri- 
cole de cartouche ou demulti- 
plexeur de schpountz indexe a 
droite (parce que depuis le 16 



mars, il faut faire gaffe ou on 
s'indexe), c'est que vous craignez 
mechamment. 

Le troisieme chapitre qui fait plus 
de 300 pages est le plus beau. 
Celui grace auquel je ne dors 
plusla nuit, celui qui m'excite a 
chaque fois que je le consulte. 
Dedans, vous trouverez la descrip- 
tion des fonctions du BIOS, Impli- 
cation des graphismes, des vec- 
teurs d'exception, de la structure 
des interruptions, de I'emulateur 
VT52, des variables systeme et 
surtout le listing total du BIOS 
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entierement comments et done 
tres, tres instructif. 
Courez chercher 249 francs sous 
la pile de linge dans I'armoire au 
fond de la chambre, parce que si 
vous ne possedez pas cette Bible 
(qui porte vraiment bien son nom). 
c'est que vraiment vous etas un 
vieux ringard tout craquele et que 
vous ne meritez meme pas de 
posseder cette foutue becane 
qu'est le ST. Ainsi soit-il. 



VILS POMPEURS 



Un mois apres le Show Atari au 
Novotel de Londres, c'est Commo- 
dore qui s'y colle en organisant 
tres exactement au meme endroit 
un show de la meme envergure a 
juste un mois d'ecart avec son 
concurrent. Commodore espere 
bien rameuter son monde en hur- 
lant partout qu'il y aura des Amiga 
et surtout des softs pour Amiga, 
chose qui vaut bien le deplace- 
ment puisque ca va faire 4 ou 5 
mois qu'on nous promet de nous 
les montrer la semaine suivante ! 
Done, si Commodore vous excite 







autant qu'avant, rendez-vous au 
Novotel d'Hammersmith a Lon- 
dres les 9, 10 et 11 mai. Merci la 
foule. 



DU RIFIFI DANS 
LESAV 



Les coco-modoristes, j'ai une 
superbe histoire a vous raconter. 
Je suis sur qu'avec ce que je vais 
vous apprendre, vous allez reven- 
dre illico votre matos et vous pre- 
cipiter sur une autre becane. Mais 
avant d'en arriver a des conclu- 
sions aussi dramatiques, laissez- 
moi vous replacer dans le contexts 
le plus exact possible. Et pour 
cela, un petit retour en arriere 
s'impose ! 

II y a encore deux ans, la societe 
Commodore etait dirigee par le 
celebrissime Jack Tramiel. Ce 
brave homme, sur de sa (ami lie et 
de ses amis, s'etait demerde pour 
placer des hommes de confiance 
a la tete de toutes les societes qui 
s'occupaient d'importer les pro- 
duits de Commodore dans leur 
pays respectifs. Dans notre cas, 
restons Francais, Procep s'occu- 
pait de I'lmportation. de la diffu- 
sion, de la promotion et du service 
apres-vente (SAV) des materiels 
Commodore, tant professionnels 
que grand public. Elie Kenan, 
homme de reflexion, avait decide 
de confier la realisation technique 
du SAV a une entreprise 
d'Asniere, Barlec Depuis le debut 
de leur accord, Procep fournissait 
a Barlec les pieces necessaires au 
bon fonctionnement de la 
maintenance. 

Le systeme, malgre des lenteurs 
certaines (deux mois pour faire ali- 



gner la tele d'un drive par exam- 
ple), tournait tant bien que mal 
jusqu'a pas plus tard que recem- 
ment. En effet, deux phenomenes 
nouveaux se sont enchaines ces 
derniers mois : tout d'abord, apres 
le depart fracassant de Tramiel de 
Commodore, une filiale officielle 
de la marque est creee en France. 
Malgre cela, Commodore France 
continue a faire confiance a Pro- 
cep pour le SAV. Cette nouvelle 
structure n'a done pas empechS 
les habituels receptionnaires du 
materiel (Procep) de le confier a 
Barlec, avec les pieces detachees, 
pour assurer le service technique. 

La oil le paysage change radica- 
lement, c'est lorsque Jack Tramiel 
se rend compte que la filiale fran- 
caise de sa nouvelle boite (Atari) 
ne fait pas vraiment un boulot con- 
sequent pour imposer la marque 
dans notre pays. Rssultat : Jack 
se souvient de son ancien parte- 
naire et lui propose de recommen- 
cer comme avant, mais pour son 
nouveau materiel : Atari. La 
encore pas de lezard. Mais 
I'anguille commence a pointer son 
nez de dessous la roche I 

Commodore France est tres vexe 
de voir Procep "changer de 
camp" et s'occuper d'Atari 
France. Par retorsion, Commo- 
dore France decide de ne plus 
fournir a Procep les materiels et 
les pieces detachees necessaires 



AU BOUT DE L'ENFER 



Si la simulation du plus grand de 
tous les dangers ne vous fait pas 
peur, si vous souhaitez plonger 
dans un futur oil les lendemains 
ne chantent pas, si vous revez 
d'etre David et d'avoir quatre 
Goliath en face de vous, si vous 



un raz de maree sans precedent 
qui noieront a eux deux les cotes 
europeennes et americaines. A la 
suite d'une bidouille geniale, les 
scientifiques ont repris le controls 
de I'un des cinq ordinateurs et un 
commandant humain est neces- 







avez des reflexes et des nerfs 
d'acier, vous allez pouvoir vous 
jeter dans I'aventure de Monolith 
Quake Minus One. Dans ce logi- 
ciel de Loading Edge Software, 
vous allez affronter quatre ordina- 
teurs revoltes contre I'ordre 
humain et deployant une puis- 
sance guerriere hors du commun. 
Remettons Taction dans un con- 
texts comprehensible : les sour- 
ces d'energie fossile (charbon, 
petrole, uranium...) sont epuisees 
depuis longtemps. Les scientifi- 
ques ont trouve comment exploi- 
ter la chaleur du magma au fond 
des mers. Une gigantesque instal- 
lation au fond de I'Atlantique four- 
nit Telectricite pour Tensemble des 
pays industrialises. Cette centrale 
est dirigee par cinq ordinateurs, 
tous aussi megalos les uns que les 
autres. Recemment, ces dingues 
de machines viennent de lancer 
un ultimatum a tous les gouverne- 
ments du monde : le Mouvement 
pour la Liberation des Robots a 
decide de liberer brutalement 
toute Tenergie accumulee par la 
centrale provoquant ainsi un trem- 
blement de terra gigantesque et 



saire pour le diriger. On vous 
demande de contrer I'offensive 
robotique dans les trois heures (en 
temps reel) qui restent avant 
I'explosion finale. 

Entierement graphique, dirige par 
joystick, ce wargame peut pas- 
sionner autant les fanatiques de 
I'arcade que ceux qui preferent la 
strategic et la tactique. A I'ecran, 
vous avez une vision du terrain a 
controler (avec deux niveaux de 
carte, Tune globale I'autre de 
detail), des icones pour selection- 
ner le type d'armement, les defa- 
cements, les reparations, une vue 
en trois dimensions de la zone oil 
vous vous trouvez et deux indica- 
teurs du niveau de fuel et d'ener- 
gie. Le tout est enrobe de bruita- 
ges particulierement angoissants 
(normal pour Tambiance), ce qui 
n'ote rien a Tensemble, bien au 
contraire. C'est genial, extraordi- 
naire, superbe, original et fantas- 
tiquement bien realise. Un bijou 
comme on en rencontre rarement. 
Monolith Quake Minus One de 
Loading Edge Software pour 
Commodore. 



La situation est tenement grave 
que Barlec en est arrive a envoyer 
une circulaire a tous les reven- 
deurs qui avaient confie du mate- 
riel a reparer (celle que nous 
publions ici, meme si elle n'est pas 
trap hsible). Chaque revendeur est 
ainsi informe que plus personne 
en France n'accepte officiellement 
de prendre en charge la mainte- 
nance des materiels Commodore 
actuellement sur le marche et qu'il 
peut recuperer ce qu'il avait con- 
fie a Barlec. La circulaire se (er- 
mine malgre tout sur une note opti- 
mists : "...nous esperons trouver 
rapidement une solution avec 
Commodore France afin de conti- 
nuer a vous assurer un Service 
Technique." 
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a Barlec pour assurer le SAV (ca 
va ? Vous suivez ?). Et qui c'est 
qui se retrouve sans pouvoir assu- 
rer cette maintenance du mate- 
riel ? C'est Barlec ! De plus. Com- 
modore France refuse bien 
entendu d'assurer le service 
apres-vente. Alors, les lecteurs, 
vous commencez a comprendre 
ce qui vous pend au nez ? Tant 
que votre C64 ou votre C128 tient 
la route, pas de soucis a vous 
faire. Mais le jour oil il commen- 
cera a donner des signes de fati- 
gue, vous allez devoir vous met- 
tre en chasse d'un reparateur 
independant qui accepte de vous 
bricoler votre micro sans faire 
appel aux instances nationales. 
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Comme d'habitude, c'est Commo- 
dore qui decroche le gros lot dans 
la categorie entubage et prise du 
public pour des cons. Chose 6 
combien surprenante, n'est-il 
pas ? Malheureusement, pour 
eux, la lettre de Barlec est venue 
inopinement jusqu'a nos bureaux. 
Alors, encore une fois nous cla- 



mons : Commodore nous prend 
pour des cons et nous ajoutons 
encore une fois ca commence a 
bien faire ! Une suggestion gra- 
tuite : Commodore pourrait se 
recycler dans la cacahuete , ?a 
permettrait a des gens serieux de 
s'occuper de la micro. 



TIENS, UN SOFT 
PAS NUL 



Si je vous dis que sur Amstrad, il 
y a un soft qui se nomme Zaxx, 
vous ne pouvez que me rire au 
nez. Et piourtant, ce programme 
contre toute attente est bien rea- 
lise et peut (si, si), sous reserve de 
patience, en amuser quelques- 
uns. Pour ceux qui n'auraient pas 
encore compris la metaphors, il 
s'agit d'une Nieme version de 
Zaxxon, le jeu qui fit fureur il y a 
quelques annees dans les cafes et 
sur les consoles de jeu (Coleco 
Rest In Peace). 

Qu'est-ce que Zaxxon, me deman- 
deront les plus jeunes d'entre 
vous, ceux qui n'ont pas connu les 
debuts eclatants de la micro (ses 
faillites, ses reussites et ses 
musses, n'oubliez pas le guide) ? 
C'est le premier jeu d'arcade en 
quelque chose qui ressemble a de 
la 3D et qui met en scene un vais- 
seau spatial paume dans Tespace 
intersideral avec pour mission de 
detruire une base foutrement bien 
gardes par des lance-missiles et 
autres canons protoniques phos- 
phorescents au look glace-a-la- 
vanillesque. 

Commenter pour la millieme fois, 
ce soft me semble etre assez inu- 




tile, voila pourquoi je vous fais 
directement un petit bilan de 
I'adaptation amstradienne de la 
chose : bien foutu, assez rapids et 
agreable malgre quelques erreurs 
qui n'arrivent pas a rendre le jeu 
insupportable. 
C'est Zaxx sur Amstrad de Chip. 
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C'est nouveau, 9a went de sortir 



ON A 
TROUVE CA ! 



Et sans chercher beaucoup puisque la quasi-totalite des editeurs et des 
grossistes anglais ont recu ce tres joli telex emanant d'un gras et gros 
grossiste pas content et lui aussi bien embete. Rassurez-vous, nous 
trouvons toujours des logiciels, ce telex date (fun mois et les Anglais 
continuant a livrer. Business is business. 




A /"attention du directeur general 
De : D. Thebaud 

Nouvelles importantes sur le piratage 

Depuis plusieurs mois le magazine francais Hebdogiciel connu aussi 
sous le nom de Shift Editions publie des astuces pour pirater des 
logiciels. 

Exempts N"1 : 



Hebdogiciel N°126 page 14 

lis expliquent comment pirater "Devil's Crown" surAmstrad, "Spy vs 

Spy" sur Amstrad. Dans cheque numero, il y a des examples similaires. 

Example N"2 : 



Us ont aussi une banque de donnees a laquelle on peut acceder grace 
a un minitel et ils expliquent aussi comment pirater le logiciel "The Way 
of the exploding fist", par exemple 

Exemple N"3 : 



lis publient des petites an nonces de jeunes gens qui proposent ouver- 
tement d'echanger des programmes pirate's. 

Nous pensons que carte actrvM est tres mauvaise pour I' ensemble de 
la profession. 

Hebdogiciel a aussi land ilya deux semaines un Club de VPC qui 

propose des logiciels a 30% de reduction sur les prix francais. Las raven- 
deurs francais sont tres embetes. 

Nous aimerions que vous preniez ces informations en consideration 
at que vous en informiez vos distributeurs anglais car Hebdogiciel assaie 
d'acheter des logiciels en Angleterre pour son club. 

Nous pensons que tout le monde doit etre informi de ce qui se passe 

id et les editeurs et grossistes francais prendront toutes les mesures 

necessaires pour proteger I'industrie du logiciel. 

Une action legale est en cours. 

Nous pensons que tous ceux qui aJdent Hebdogiciel en que/que facon 

que ce soit font du mal a I'industrie du logiciel. 

Nous ne voulons pas que la France devienne un pays de pirates comma 
I'ltalie et nous demandons votre cooperation. Si vous voulez plus de 
details, demandez-moi. 

Sincerement 
D. Thebaud 



TEMUDES SUR LES BERPETES (&) ($$%&* 
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Tempete sur les Bermudas pour 
ceux qui n'auraient pas compris 
que je suis un adepts de la simu- 
lation contrepetrique, art qui en a 
fait mourir plus d'un, qu'on se le 
dise, Tempete sur les Bermudas 
est un jeu d'aventure issu des 
juveniles cerveaux de la seule 
botte de soft francaise qui croit 
encore qu'on peut vendre (vendre 
au sens fric du terme, cela va de 
soi) des programmes pour Apple. 
Les passionnes, ca existe encore. 
Froggy Software a done sorti ce 
programme que je qualifirai de pas 
tres bon voire meme d'assez nul 
si j'etais parfaitement impartial. 
-Comment ca "si j'etais impar- 
tial" ? Parce qu'on n'est pas 
impartial, nous, a I'HHHHebdo I 



EHe eat bien bonne ce tte l a I Treve 
de plaisanterie et de laxisme, 
disons la verite telle quelle, disons- 
la avec force et fracas : ce logiciel 
est nul. 

-Merde, mais on va perdre tous 
nos contacts avec Froggy en 
disant du mal de leur produit. Qu'a 
cela ne tienne, voici la formula 
magique qui nous permettra de 
rester copain avec eux : "je suis 
tout a fait desole pour I'auteur, la 
mere de I'auteur et surtout I' Asso- 
ciation Francaise pour le Develop- 
pement Universe! du Jeu d'Aven- 
ture Nul que Tout le Monde Trouve 
Bien dans I'Entourage Mesquin de 
ceux qui Croient Connaitre ne 
Serait-ce que de Vue I'Equipe de 
Developpeurs. Done, j'adresse 
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mes condoleances a I'AFDU- 
JANTMTBEMCCSVED". Sincere- 
ment, je suis desole mais je peux 
vous assurer que si je n'etais pas 
entre dans ma periode d'impartia- 
lite seche, je n'aurais pas avoue 
avoir ete retoume d'horreur par 
I 'analyse syntaxique inexistante, 
les dessins pas vraiment geniaux 
et le scenario nullissime (en gros : 



naufrage sur une lie deserte, a 
vous de vous debrouiller) 

Que dire de plus si ce n'est que 
ce programme rappelie les tout 
debuts des jeux d'aventure sur 
Apple, ce qui est grave en 1986. 
Ah, ca fait du bien d'avoir ete 
impartial pendant quetques secon- 
des, ouf ! Quel panard ! 



FALKLANDS, 

VOUSAVEZDITFALKLANDS? 



Moi, j'ai entendu Malouines. Falk- 
lands, ca n'existe pas. En 1982, la 
mare Thatcher a balance son 
armada vers les Malouines pour 
alter virer les Argentins qui etaient 
venus y planter la tente et la 
merde. Resuttat du conflit : la 
vente de super standards et 
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d'Exocet n'a cesse d'augmenter. 
Heureusement pour I'economie 
francaise que les Albions et les 
Argentins se sont mis sur la 
gueule I 

Apres ce petit rappel historique, 
bref mais nucessaire, voici le soft 
qui a ate tire de cette aventure : 
Falklands 82 de PSS pour C64. Je 
vous dis tout de suite : c'est nul. 
Pourquoi done ? Parce que c'est 
nul. II y a des softs comme ca qui 
ne portent pas a la discussion. 
Quand vous avez envie de jouer 
a un bon wargame, il taut absolu- 
ment que I'ecran soit bien orga- 
nise, qu'il ne soit ni surcharge ni 
trap vide. Or, voila, rien qu'a la vue 
de I'ecran on n'a pas envie de 
jouer plus longtemps que les quet- 
ques secondes d'usage. Dom- 
mage, moi qui accroche vite sur 
les wargames, la, j'ai vraiment ete 
decu d'autant plus que question 
interSt de jeu, c'est pas le super 
pied. Voila encore un jeu reserve 
aux britiches et autres bouffeurs 
de pudding. 

Perdez les Malouines avec Falk- 
lands 82 de PSS sur C64. 



TCHATCHE 



Si vous voulez vous convaincre de 
la quaiite du Telestrat et de Vismo 
reunis, vous pouvez appeler au (1) 
43 38 00 29, pas tous en meme 
temps please, because c'est un 
mono-voie, mais allez-y quand 
meme. Euh, je precise pour les 
incurables qu'il faut un minitel 
pour appeler et qu'il faut appuyer 
sur Connexion/fin lorsqu'on 
entend une voix suraigue dire 
"hiiiiiiiiiiiiii" 




IL S'Y PIQUE 



Comme dirait ('autre : il spike. Oui, 
d'accord, c'est nul. Mais c'est 
neanmoins le titre d'un logiciel sur 
Spectrum venu des laboratoires 
Firebird. 

C'est un bon jeu d'ailleurs, je ne 
vois pas pourquoi j'en dirais du 
mal. C'est amusant, c'est assez 
bien foutu. Bon, d'accord, le sce- 
nario a ete deja vu un peu partout, 
mais ce n'est pas grave. 
Vous dirigez un petit bonhomme 
grace aux touches du clavier et 
vous devez vous balader de 
tableau en tableau histoire (aire un 
petit tour et d'eviter les monstres 
ignobles qui rodent tout autour. 
Oh, pourquoi dire du mal de ce 
petit jeu, pourquoi ? 
Allez, un bon point pour Spike sur 
Spectrum. 



SPIKE 




rtif^cBrr^Gl 



C'EST PAS MOI, 
C'EST 



Gasoline Software est une toute 
jeune societe dynamique qui est 
persuade* de pouvoir faire son 
trou avec des logiciels pour toutes 
machines a moins de 100 francs I 
Si, vous avez bien lu : moins de 
100 francs. Voila une idee super 
que nous ne manquerons pas de 
promouvoir. Pensez done : enfin 
du logiciel a prix correct, (a vaut 
la peine, non ? 

Etes-vous bien sur qu'il n'y a pas 
un coup foireux derriere ca ? 
Comme dirait Blier : "ca sent 
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exorbitant, ils se sont fmalement 
lances dans r aventure 
Attention, on n'est pas des sauva- 
ges : on veut bien tenter de nou- 
velles experiences mais si jamais 
on se plante, pas question de 
mouiller la bofte dans une histoire 
pas claire. Ere Informatique n'a 
rien a se reprocher, pas question 
de se meter a la tange heodogtctei- 
lienne, "vous comprenez, on ne 
fait pas de politique, on n'a rien a 
se reprocher". 
Le jeu est clair : soit I'operation 




'roussi ca veut dire qu'ca va bien- 
tot sentir le brute" I 
Vous n 'avez pas tort : Ere Informa- 
tique est dans le coup I Qu'est-ce 
que c'est que cette histoire ? Cette 
societe appartient entierement a 
Ere. Mais pourquoi done Ere 
investirait dans une societe de 
logiciels en ce moment alors que 
seules les valeurs sures tiennent 
la route? 

Eh bien ca peut se comprendre. 
Ere est une botte qui n'aime pas 
faire de vagues, qui vend cher de 
bons logiciels et qui pour I'instant 
n'a pas I'intention de changer de 
politique. Seulement voila, a force 
qu'on leur dise que le logiciel au 
juste prix peut rapporter autant 
sinon plus que le logiciel a prix 



s'avoue fructueuse (Karate sur 
One Atmos sera le premier logiciel 
a sortir a 99 francs) et Ere (era un 
beau communique disant qu'ils 
avaient tout prevu at qu'ils sont 
geniaux, ou bien I' affaire se casse 
la gueule parce que le march* n'a 
pas bien ete etudie et Ere s'en sort 
indemne puisqu'officiellement 
independent de Gasoline Soft- 
ware. Bref, tout ceci serait parfait 
si parsonne n'avait dit bien haut 
que GASOLINE SOFTWARE 
C'EST ERE INFORMATIQUE. 
Pourquoi ne pas avoir tente le tout 
pour le tout et s'etre lance sous le 
nom de Ere dans la branche du 
soft a moins de 100 balles ? Ah, 
mon pauvre monsieur, si on faisait 
ce qu'on veut I 



ENVOYEZ 
LA MUSIOUE ! 



Si vous cherchez de quoi faire 
causer votre micro, allez faire un 
tour du cote de Clermont-Ferrand 
a Techni-Musique. En effet, Chez 
ces joyeux drilles, vous pourrez 
trouver quel que soit votre micro 
une synthese de parole pas trop 
chere ainsi que lea logiciels pour 
la faire tourner. Amstrad, MSX, 
Thomson, Commodore et Oric 
Atmos sont susceptibles de vous 
dire "merde" pour quelque 500 
francs en moyenne. Les softs dis 
ponibles sont, entre autres, Voca- 
graphic et Vocal /FR qui sont res 
pectivement un logiciel d'etude du 
langage et une banque de 300 
mots francais. Inutile de vous dire 
que c'est un plan bestial pour ceux 




qui s'excitent avec des voix dou- 
cement synthetiques. 
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PRECISION 



Amstrad et la vitesse, ca fail deux, 
y a qu'a voir a quel rythme Ms four- 
nissenl des trois pouces. Ms vien- 
nent de m'envoyer leur communi- 
que de presse stipulant l' achat de 
Sinclair. Bon, on le savait deja. Ce 
qui est plus drdle, c'est une petite 
phrase extraite dudit dossier : "la 
marque Sinclair couvrira le bas de 
gamme et la gamme Amstrad cou- 
vrira un marche familial plus 
serieux, plus interessant". En 
plus, ils ont achete le droit d'etre 
mechant avec les ex-concurrents. 







LES PTT LEADERS ? ? 



D'apres Newsweek, hebdo d'infor- 
mations generates americain, la 
France est leader sur le marche 
mondial du Videotex. En soi, ce 
n'est pas vraiment une perfor- 
mance, on peut aussi considerer 
qu'elle est le leader mondial du 
camembert. Ce qui est tres drdle, 
c'est I'article de fond qui suit cette 
declaration dans I'eminent maga- 
zine : on glisse en deux mots sur 
tout le secteur professionnel, 
I'annuaire, les services, et on 
s'etend durant tout le restant de 
I'article sur les messageries, "sor- 
tes d'usines matrimoniales a 
grande echelle". L'auteur decrit et 
traduit les pseudos en anglais, 
passe quelques dialogues, expli- 
que comment on se rencontre, a 
quelle frequence, comment (a 
marche, si c'etait bon et tutti 
libitum. 

Nous avons done d'un cote les 
Francais, accroches a leur serieux 
et qui meprisent souverainement 
les messageries (passez un coup 
de fil a la DGT et demandez un 
renseignement sur une message- 
rie, vous allez voir !), et d'un autre 
cote les Americains qui semblent 
completement enthousiasmes et 
qui trouvent ca genial. Vous seriez 
Americain, qu'est-ce que vous 
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feriez ? Vous monteriez la meme 
chose Outre-Atlantique ? Ben oui, 
gagne. Et les Francais pourront 
prendre leur serieux, se le rouler 
en pointe et se le mettre... 
(mort du chroniqueur) 



QUICK SHOT IX 





1) BOULE DE CONTROLS A MICRO-CONTACTS 

2) TIR AUTOMATIQUE 

3) LED DE CONTROLS DES BOUTONS DE TIR 

6) COMMUTATEHRDROITE GAUCHE POUR CHANCER DE 
MAIN 

7) CABLE DE RACCORD AUX NORMES ATARI. 



FONTIONNE AVEC LES ORDINATEURS: ATARI, COMMODORE, 
SPECTRAVIDEO ET LES CONSOLES DE JEUX VIDEO. 
FONCTIONNE AUSSI SUR LES ORDINATEURS AMSTRAD SANS 
POSSIBILITY DVTILISER LE TIR AUTOMATIQUE Nl LES VOYANTS 
DE CONTRdLE. 




BON DE COMMANDE A ENVOYER A S. EH. 160 RUE LEGENDRE 75017 PARIS 

N° DE CARTE : 



QUICK SHOT IX 165 F. D PRIX SPECIAL CLUB HEBOOGICIEL 133 F. C 

NOM : PRENOM : 

ADRESSE 

CODE POSTAL VILLE : 

Participation aux frais de port : 20 F. 




onus 



AMSTRAD 

CPC 464 Mono 2680 F 

CPC 464 Couleur 3980 F 

CPC 6128 Mono 4480 F 

CPC 6128 Couleur 5980 F 

PCW 8256 nous consulter 

Lecteur K7 350 F 

Lecteur Disq DD1 1990F 

Lecteur Disq. DD12 1490 F 

Imprimante DMP 2000 2290 F 

Imprimante LX 80 

Imprimante OKIMATE 2990 F 

Imprimante MCP 40 950 F 

Imprimante TP 100 2250 F 

Adaptateur Peritel MP 1 395 F 

Adaptateur Peritel MP 2 495 F 

Crayon optique LP 1 290 F 

Souris AMX 690 F 

Synthetiseur vocal 390 F 

Synthetiseur musical 495 F 

MODEM 1990 F 

Emulateur Minitel 890 F 

RS232 590 F 

Tabtette graphique 

Doubleur JOYSTICK 220 F 

Extension memoire 64K 590 F 

Extension memoire 256K 1 1 90 F 

Disque Silicone 256K 1 190 F 

Moniteur Couleur 2200 F 

COMMODORE : 

Unite Centrale : C 64 1 800 F 

C128 

C128D 6400 F 

AMIGA nous consulter 

PC 1 nous consulter 

PC 20 nous consulter 

Lecteur cassette 1 530 350 F 

Lecteur disquette 1 54 1 1 800 F 

1570 2450F 

1571 3250 F 

MPS 801 1300F 

MPS1000 

Mono s/son 890 F 

Mono a/son 1 1 00 F 

Couleur CIAGI 2100 F 

Couleur1702 2500 F 

Couleur1901 3500 F 

Interface PAL RVB 450 F 

Crayon optique 410F 

Souris 550 F 

Synthetiseur 640 F 

MODEM 1990 F 

Emulateur Minitel 390 F 

RS232 650F 

POWER CARTRIDGE 490 F 

Tablette graphique 390 F 

Clavier musical 620 F 



Imprimante : 



Moniteur : 



ACCESSOIRES : 

Poignee de jeux QS I 

QSII 

DAEWOO 

PRO 

TURBO 

Boite rangement 50 disq. 5" 1/4 150F 

Boite rangement 1 00 disq. 5 " 1 /4 225 F 

Bofte rangement 30 disq. 3" 150 F 



70 F 

90 F 

120 F 

220 F 

220 F 



70 F 
90 F 
70 F 
70 F 
120 F 
150 F 
60 F 



Housse C64 

C128 

CPC 464 

CPC 6128 

Capot C64 

C128 

Pince a disquette 

Tous cordons a la demande 
CONSOMMABLES : 

Cassettes vierges C20 (les 1 0) 60 F 

Disquettes 5 '1/4 SP DD (les 10) 90 F 

Disquette 3" 

Papier listing 

Ruban encreur 

Recharge stylo table tracante 

LOGICIELS : 

ACTIVISION-LORICIELS-ULTIMATE-ARIOLASOFT-OCRA 

ERE-AMSOFT-MICRO APPLICATION-US GOLD-CORE 

KONAMI-etc... 

JEUX-PEDAG0GIQUES-UTILITAIRES 

LIVRES : 

MICRO APPLICATION-PSI-SYBEX-NATHAN-etc... 



REMISES AUX COLLECTIVITES 

Ouvert du Lundi au Samedi 
de9h00a19h00 




LA BOUTIQUE 



A.M.I.El 



1 1 , bd Voltaire 

7501 1 Paris 

(M° Republique) 

Tel. : (1)43.57.48.20 



FINI LES INTERMEDIATES - A.M. I.E. DEPANNE VOS MICRO 

Prix fixes : Forfait ou sur devis 

Delais reduits : Maxi 8 jours 

Qualite assures : Chaque reparation est garantie 1 mois 



^^omo S betid/ Si cob 



C 64 + lecteur K7 1990 F 

C 64 + lecteur Disq 3250 F 

C 1 28 + 1 571 6200 F 

C 1 28 D + 1 901 9600 F 

CPC 464 Mono + Interface Couleur 2850 F 

CPC 6128 Couleur + Imprimante 6870 F 

BON DE COMMANDE EXPRESS a envoyer a : A.M.I.E 

NOM 
ADRESSE 

TEL 

i TITHES PRIX I 

Participation am frais de port et d'emballage + 20 F 
Refitment : je joins CI un cheque bancaire Q C.C.P. D m»ndat -lettre 
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Jean-Michel Jarre qui fait un concert 
a Houston, eh, oh lui, eh ! Rien que 
ca ! A Houston, Texas ! Un concert ! 
Devant un million de personnes ! 
C'est degueulasse, j'aurais pu le 
faire a sa place, quand meme ! 
C'est dommage qu'ils m'aient pas 
appele, j'aurais surement fait 
I'affaire. Parce qu'on s'imagine, 
comme ca, mais pas du tout. Jarre, 
c'est de la programmation, un point 
c'est tout. Tiens, c'est simple : il pro- 
gramme ses prises midi, point a la 
ligne. Fastoche. Meme moi je sais 
le faire. Tout le monde sait le faire. 
T'as une prise midi, hop, tu la pro- 
grammes, et t'as du Jean-Michel 
Jarre. Apres, t'appelles Houston, 
alio bonjour, c'est pour faire un con- 
cert, est-ce que vous pourriez me 
trouver un million de personnes d'ici 
ce soir ? Pas de probleme, mon- 
sieur, en prime on vous donne 
douze buildings pour etaler vos fais- 
ceaux laser, la sono, et un tee-shirt 
"j'aime les prises midi". Ca vous 
va ? Tres bien, Jarvis, tres bien, ce 
sera parfait. A ce soir done. 
Fastoche, moi je dis. Et meme : 
superfastoche. Tiens, y a un type, 
la, Gandalf, du groupe Black Circle, 
qui programme sa prise midi en 
trouvant des solutions. II a trouve 
Mission Impossible : 
"Wait, wait (jusqu'a entendre quel- 
que chose qui tombe), take tape, 
west, south, sit, press red, press 
white, stand up, take picture, search 
saboteur (il doit se trouver dans une 
piece proche), take saboteur, take 
picture, north, north, west, north, 
show picture, break window, with 
tape, show picture, go window, take 
key, go window, press white, south, 
east, south, drop picture, drop pic- 
ture, drop saboteur, south, sit, 
unlock yellow, press white, press 
red, press yellow, press white, stand 
up, drop key, take picture, north, 
down, north, show picture, west, 
take cutters, search mop, take key, 
drop picture, east, press yellow, 
south, up, south, sit, unlock blue, 
press red, press yellow, press blue, 
press white, stand up, drop key, 
take picture, north, west, take pail, 
east, north, north, show picture, 
west, wear suit, take water, east, 
open door, push hard, go door, east, 
drop pail, drop picture, west, down, 
cut wire, take bomb, up, east, take 



pail, put bomb (sauver la partie pour 
le cas oil il y aurait une explosion 
irreparable), pour water." 
Deja. ga, ca lui a donne presque tout 
Oxygene, d'un coup. Ensuite, il a 
trouve Mission Asteroid : 
"Push switch, open door, go door, 
say starstruck, north, west, salute, 
east, east, get disk, load computer, 
east, get explosives, east, lift 
weights, east, take shower, west, 
north, north, open door, west, north, 
up, push button, go door, push blue, 
north, west, get spacesuit, wear suit, 
east, push throttle, push black, push 
black, push orange, push white, 
push white, push white, push blue, 
push white, push orange, push 
orange, push throttle, south, turn 
dial, push orange, south, down, 
south, south, west, go cave, south, 
set timer, 150, drop explosives, in 
pit, north, north, east, north, north, 
north, up, go door, north, push 
throttle, push blue, push blue, push 
orange, push black, push black, 
push black, push blue, push white, 
push white, pull throttle, south, push 
orange, south." 

Avec ca, il a eu Equinoxe. Content, 
il etait. S'il avait telephone a Hous- 
ton quinze jours avant Jarre, c'est 
lui qui faisait le concert 
Un million de personnes, dis done. 
C'est quand meme chouettos. Je 
m'en voudrai toujours d'avoir rate 
ga. Mais la, je suis prevenu : je vais 
me demerder pour que ce soit moi 
qui fasse le concert du 14Juillet.Ca 
va y alter, les prises midi. Je relie 
ensemble mon Atari, mon Apple, 
mon Commodore et mon Telestrat, 
tous mes synthes et mes bottes a 
rythmes derriere, je loue le plus gros 
laser du monde et roulez jeunesse 
Tsunoo est un fervent musicien 
aussi puisqu'il a passe une bonne 
partie de ces quinze derniers jours 
a realiser une copie anti-cafe de 
Music Studio sur Atari ST, ainsi que 
quelques autres. 

"Pour Delta Patrol et Monkey Busi- 
ness, tapez ce programme sous 
assembleur, executez-le puis met- 
tez votre original sans write protect 
et tapez sur une touche. 

move.w : 1,-(sp) 

trap |t 1 

addq.l ft ?,sn 

move.w It 5,d5 



BIDOUILLE | 

I GRENOUILLE 



fm 



saut 



fin 



move.w 

move. I 

move.w 

move.w 

move.w 

move.w 

move.w 

move. I 

move. I 

move.w 

trap 

add 

tst 

bmi 

emp 

beq 

emp 

beq 

add.w 

imp 

move.w 

jmp 

clr.w 

trap 

end 



S $e5e5,-(sp) 
It $8765432 1,-(sp) 
i 1,-(sp) 
«0,-(sp) 
d5,-(sp) 
K 9,-(sp) 
It 0,-(sp) 
1 0,-(sp) 
9 $70000,-(sp) 
It 10,-(sp) 
It 14 
It 26,sp 
dO 
fin 

It 5,d5 
saut 
It 79,d5 
fin 

8 1,d5 
fm 

It 50,d5 
fm 
-(sp) 
It $1 



Pour realiser une copie de securite 
de Borrowed Time et de Mindsha- 
dow, charger le fichier programme 
a I'aide d'un utilitaire de travail sur 
disque puis si les octets $E6 et $E7 
contiennent $4E et $B9, les chan- 
ger en $60 et $0E. Sinon, attendre 
qu'on donne le reste. 
Pour Hacker : lire le programme 
/hacker. dat/bwhacker prg et si a 
partir de I'octet $66 il y a $60 $00 
$70 $9E, changez-les en $30 $3C 
$00 $09. 

Pour Music Studio, editez le fichier 
audio. prg et si a partir de I'octet 
$21 C4 vous trouvez les octets $4E 
$B9, changez-les en $60 $10." 
Ceci dit, Tsunoo a moins de merite : 
faire de la musique avec Music Stu- 
dio, c'est vraiment fastoche. D'ail- 
leurs, Jarre I' utilise surement, tene- 
ment c'est facile. 
Moi, j'ai une super idee de concert, 
j'ai d'ailleurs envoye les demandes 
d'autorisation, j'attends la reponse. 
II faudrait equiper completement 



Notre-Dame de Paris, avec des 
amplis, des chateaux d'enceintes, 
tout un matos effroyable, faire le 
concert pendant deux heures et au 
bout des deux heures, tout s'ecrou- 
lerait sous la puissance du son. Les 
vitraux commenceraient a eclater 
(la, je fous les basses a fond), les 



un super concert, dement. 
Jide, le musicien principal (et uni- 
que) du Soft Crack Band, a appris 
le solfege en faisant des gammes 
sur son Amstrad. Pour commencer, 
il a fait une copie anti-cafe 
d'Electro-Freddy. 
Tapez : 

POKE &AC03, &AE : POKE &AC02, 
&45 : POKE &AC01 , &32 : LOAD "" 
Puis ajoutez les lignes suivantes : 
252 INPUT "Vitesse de I'oncle 
Claude";vc 

255 INPUT "Nombre de vies";nv 
257 INPUT "Vitesse de Freddy" ;vf 
259 POKE &99C6, vc : POKE 



&*? dtijSfe. 




murs a s'effriter (la, on commence 
I'evacuation), puis a s'ecrouler com- 
pletement, et en 30 secondes au 
plus, tout Notre-Dame de Paris 
serait detruite. Bien sur, on perdrait 
un monument, mais on s'en fout, 
puisque ga me permettrait de faire 



&99BC, nv : POKE &99DB, vf 
Les valeurs doivent etres comprises 
entre et 255. Sauvez le tout sous 
le nom de "Electro" et faites un 
Reset. Puis, pour recopier les 8 par- 
ties en binaire, faites : 
MEMORY 10000 



LOAD "" : SAVE "E1", B, &7FA0, 
&7FF 

LOAD "" : SAVE "E2", B, 8.8799, 
&7FF 

LOAD "" : SAVE "E3", B, &8F92, 
&7FF 

LOAD "" : SAVE "A1", B, &83C9, 
&7FF 

LOAD "" : SAVE "A2", B, &8B92, 
&7FF 

LOAD "" : SAVE "A3", B, &936B, 
&7FF 

LOAD "" : SAVE "A4", B, &9B36, 
&7FF 

LOAD "" : SAVE "A5", B, &A30D, 
&7FF 

Et pour I'accompagnement, il a 
decide d'utiliser des vies infinies 
dans Dragon's Gold : 
OPENOUT "D" : MEMORY &17F : 
CLOSEOUT 

LOAD "DRAGON'S GOLD", &180 
POKE &AB8, 255 : CALL &940 
Ce qui est en soi une methode fort 
honorable pour faire de la musique, 
mais qui ne vaut pas la mienne : 
moi, je relie les prises midi ensem- 
ble. Qa marche tres bien. Un million 
de spectateurs, salaud. 
Le MSX est -pas mal, justement, 
parce qu'on peut y brancher une 
prise midi. S. Vassal s'en est apergu 
tres rapidement et a decide de coif- 
fer Jarre au poteau puisqu'il a fait 
des anti-cafes avant lui. 
"Pour Coco in the castle, charger 
I'original par LOAD "COCO :". 
Attendre le Ok, prendre une cas- 
sette vierge et sauver le programme 
par SAVE "X". Remettre I'original 
et faire RUN. Une fois le programme 
charge, faire Reset, remettre la cas- 
sette vierge et taper BSAVE "X", 
&HF000, &HF36D, &HF000. 
Pour Maxima, charger le pro- 
gramme, faire Reset, mettre une 
cassette vierge et faire : 
BSAVE "X", &H8000, &H9072, 
&H8B00 

BSAVE "MAXM", &H9072, 
&HB500 

Pour Vaccumania, faire pareil et 
taper : 

BSAVE "X", &H8000, &H8B30, 
&H8B00 

BSAVE "VACMC", &HCA00, 
&HDF08 
C'est tout." 

Un million de spectateurs. Quand je 
pense que j'ai au moins deux fois 
plus de prises midi que lui. 



LAUREL ET DEULIGNE 



Waou, yayayaya, c'est les vacances, la berezina, la 
galere, le printemps, la faute a Popol, la fete a Paim- 
pol, le retour d'lndiana Jones ! 
Vous vous en doutez deja, apres avoir lu ce qui pre- 
cede : nous sommes en plein deulignes. Nous nageons 
dans les deulignes. Les deulignes nous envahissent. 
C'est I'orgie, la panade, la galere... Bref. Apres une 
petite ligne de motifs fleuris, je vous retrouve avec un 
vrai deuligne. A tout de suite. 

Vous voila ? Bonnard. On commence tout de suite avec 
un true pour M05. Les T07 et autres 70, venez pas 
chialer, vous n'avez qu'a I'adapter. Grace a ce deuli- 
gne, lorsque vous tapez le mot AUTO, vous passez 
en caracteres gras. Vous retapez AUTO et vous repas- 
sez en caracteres normaux. De toute fagon , c'est 
marque dans le REM. Et en plus, James Choquet 
gagne les deux logiciels de la semaine. 



IB C 

pT=a 

ft: PC 
READ 

6.S.H 

ORES: 

£0 C 

0RA 
ON M 

:hUT 
0.74 
,20. 



EAR,39959:PRINT"PATIENCE S.V.P. ": 
■0753:n=PEEKCT+tHFC9E>:B*A'£«C»B 
4BlS9,C!NEXTT:F0RT=3996eT03998 
0KET, VhL'' " &H"+A$ ) : NE"T: P0KE&H2 
0KE8,H2237,8,H9ClP0KE8 i H2238,*,H18 
9,tH39 

CREEN7,0:LOCATE0,£.0:FOPD=0TO1 
:FORB=0TOl:ATTR6 a. 6: PR I NT"TH0 
hTTRBO,0:PRINT:NE::TB:NEXTh:PRI 
WE i 0. 90>-< 719, 90) : NESiTP: DATABb 
DF, £7, 0B, 86, 9C, B7. 20, 73. 3b, DF 
?, 8b. FC. 87,20,73, 3b. 9E,B7, 20,7 



ET 
i*: 

r | 

rt££ 
Li: 
BT0 
05" 
0:L 
,81 



30 REM . CE DEULIGNE FERNET D'ECRIRE EN 
CARACTERE GRAS , POUR CELA IL 
FftUT TAPEi 'AUTO' EN DIRECT 0U 
DANS UN PROGRAMME BASIC . 
. MISE EN ROUTE CARACTERES GRAS 
===. 'AUTO' .ARRET==> DE N0UVEAU 
'AUTO' 

Didier Chabot, lui, a decide de faire de I'animation 3D 
grace a son Apple. La prochaine fois, Didier, fais le 
calcul des faces cachees, on verra si tu fais toujours 
le malin. 

1 HGR2 : HC0L0R= 3:D<1J ■ 139:D<5> = 
139:C<1) = 16:C<5> = 166: FOR A = 
TO 999: POKE 230,32 ♦ I * 32: CALL 
- 3086: RESTORE :X = SIN <A / 9 
) « 10 :Y = COS (A / 9) * 10:C(0) 
= 91 * X:D(0) = 139 ♦ 7 * Y + X: 
C<2) = 91 ♦ Y:D<2) = 139 * Y - 7 » 
X:C<3) = 91 - X:D(3) = 1 39 - X - 
7 » Y:C<4) = 91 - Y:D<4) = 139 * 
7 * X - Y 

3 READ M: FOR B = TO 11 : READ N: HPL0T 
D(M),C<M) TO D(N),C(N):M = N: NEXT 
: POKE 49236 ♦ 1,0:1 = ABS < I - 
1): NEXT : GOTO 1: DATA ,1,2,3, 
1,4, 3, 5, 2, ,5, 4,, 




Laurent Salafa jongle avec la memoire de son CPC 
464 (et pas 664 ni 6128 ni 8256 ni 10512 ni 2059820) 
Son programme... contient les explicances 
necessaires. 

1 MODE 1lPEN 2:PRINT"CALL IbcOG, 84 
0":PEN 1 :PRINT"Sauvegarde d'une pa 
ge ecran dans la memoire de I' 
ordi.nat.eur (464 saulemant) .F'our la 

rappeler: CALL 8BCOG , SCO" : LOCATE 
16, 15:PRINT"<TOUCHE>" :CALL 8:13606 

2 MODE 1: PRINT :PRINT"EXEMPLE": FOR 
T==1 TO 200: DRAW RND*600 , RNIIK&O0 , RN 
D»3: NEXT : PRINT" < TOUCHE > " : CALL SBBO 
6: CALL S.BC06 , 8.40 : PRINT" < TOUCHE > " :C 
ALL 1BB0G:CALL 8.BC06 , SCO : CALL XBBO 
G:GOTO 1 

mmmmmmt 



Et puis un ancien qu'on avait pas vu au moins depuis 
20 lignes, James Choquet, qui continue a sevir sur le 
meme M05 que tout a I'heure. Ca fait un true super, 
je vous dis pas pour que vous ayez la surprise. 



1 SCREENO,?, 1: CLEAR, 40793: FOPT=4080BTO46 

85*: READAt: POkET. VALC "8,H"+A* > : NEXT : CLS: L 

Oi:ATEe.e.0:COLOR7.0:PRINT"C'EST FANTAST1 

0UE DANS UN PROGRAM!-': ": CONSOLE 1 , £4 : 

POKES H£061.i.H9F.:POKE&H£06£.iHb0:POKE8,H£O 

63, 33: FORT»0TO35BB:NEXTT: POKES H2B63, 0: L0 

CATE0. 0.0 

£ PRINT"*AUPRES DE MA BLONDE ,IL FAIT B0 

N..., * ":P0KE8,H2863,3:C0L0R,, l:BEEP:DAT 

A 34, 3F.B6. 9F.5A,81,04,£E, 0b. 7C9F, 5A. 35 

,3F.3B.7F,9F,5A.Bb,H7,C0.SA.01 ,B7,A7,C0. 

8E.00.00.Ab.84,B7,9F,5B.5F.Ab,01.A7,80,5 

C.i:i,£7,£b,F7,Bb.9F,5B.A7.80.8C.B1.38.25 

.E7,35,3F,3B 

3 REM . CE PROGRAMME PEUT S'EXECUTER EN 

"MEME TEMPS" QU'UN PROGRAMME 
BASK +++++ == * MARCHE: PON ES.H2063 . 3 
* ARRET : PCU:E:;H£0b3, 

IL PEUT ETRE UTILE L0RS D' UNE 

PAGE DE PRESENTATION 

Bon, eh ben je vais me recoucher. Cassez-vous, c'est 
fini. 






ABONNEZ-VOUS 
A HEBDOGICIEL 



IT IE 5WS > To\ 



^t 



eco»c s 



A2.^ 





\ OE MAVaE BT ?£ 



572 francs pour 52 numeros achet^s chez votre 
marchand de joumaux. Dur, hein, 572 francs ? 
Faut les sortir ! 

Et si vous vous abonniez ? 450 francs au lieu de 572, 
9a marche ? Et un abonnement pour six mois vous 
coutera seulement 230 francs. 

Si vous faites partie du Club Hebdogiciel, vous avez 
gagne 10% de mieux. 405 francs pour un an et 207 
francs pour 6 mois. Le bulletin est la, dessous, on se 
depeche. 



ABONNEMENTJ 



A renvoyer 6 HEBDOGICIEL, service Abonnement, 
24 rue Baron 75017 PARIS 



Nom : Prenom : 

Adresse complete : 




Ordinateur utilise 



N° de carte obligatoire pour les membres du 
Club : 



France : 1 an : □ 450 francs 
6 mois : D 230 francs 

Etranger : 1an : □ 530 francs 
6 mois : □ 270 francs 

Membres du Club, deduisez 

vous-memes les 10% soit : 

Reglement joint : 

[1 CCP 

I I Cheque bancaire 



16 



REGLEMENT 



- L'achat des logiciels, des fourni- 
tures et des materials a prix petes 
est reserve aux membres du club 
Hebdogiciel 

- Les petites annonces gratuites 
envoyees par les membres du 
club Hebdogiciel sont prioritaires. 

- Les membres du club Hebdogi- 
ciel beneficient d'une remise de 
10% sur I'abonnement annuel et 
semestriel a Hebdogiciel. 

- Les membres du club Hebdogi- 
ciel ont acces a tous les services 
du serveur minitel Hebdogiciel 
HG, y compris la section pirate et 
les boites aux lettres (mise en ser- 
vice avril 86). 

- Les membres du club Hebdogi- 
ciel beneficient de tarifs reduits sur 
les badges, tee-shirts, casquettes 
et autres gadgets inutiles edites 
par Hebdogiciel. 

- Les membres du club Hebdogi- 
ciel recoivent une carte et un insi- 
gne gratuit lors de leur adhesion 
(a choisir parmi 9 modeles origi- 
naux de Carali). 

- Le club Hebdogiciel apportera 
son aide aux membres du club en 
cas de litige avec des vendeurs ou 
des revendeurs de materiel infor- 
matique. 

- Les membres du club Hebdogi- 
ciel disposent d'un numero de 
telephone direct oil une char- 
mante personne leur fournira tous 
les renseignements sur les activi- 
tes du club et sur les logiciels du 
soft-parade. 

- Un concours de pronostics 
reserve aux membres du club est 
organise chaque mois. Le premier 
prix est beau. Reglement en avril, 
surprise ! 

- La cotisation annuelle pour 
I'adhesion au club Hebdogiciel est 
fixee a 150 francs. 

- La carte du club Hebdogiciel est 
strictement personnelle, elle ne 
peut etre vendue ou pretee. 

- Hebdogiciel se reserve le droit de 
refuser I'adhesion au club a qui 
bon lui semble, non mais ! 

- L'adhesion au club Hebdogiciel 
entraine {'acceptation du present 
reglement. 



FAITES DE LA PROPAGANDE I 

Vous etes membre du club ? Vous 
voulez que I'HHHHebdo renforce 
sa position de meilleur canard 
d'informatique in the world ? 
Facile : faites de la propaganda ! 
Distnbuez des badges autour de 
vous et parlez du journal a tout ce 
qui bouge, surtout si il a un 
ordinateur. 

Allez-y, remplissez le bon ci des- 
sous, c'est gratuit, on paye meme 
le port. Vous avez droit a 50 bad- 
ges par personne. On compta fur 
vous, on en a fait fabriquer 30.000 
pour cette operation d'intoxication. 

Bon de command* : 

Envoyez moi un paquet de 
badges. 

Norn 

prenom 

adresse 



Un club pas comme les autres 
au lieu de se contenter de vous pomper 150 francs 

et de partir aux Bahamas avec votre fric, 

on se decarcasse pour vous trouver les dernidres 

nouveaut6s a des prix que meme les gnormes 

et gras grossistes, ils ont jamais vu 9a. 

Regardez le reglement, Id, a cote, tout est expliqu£. 



CHOISISSEZ 
UN BADGE 




AMSTRAD 



IBIS 
1815 

3 BOXING 

3 BOXING 

3 WEEKS IN PARAOISE 

30 FIGHT 

3DFKJHT 

3D GRAND PRIX 

30 GRAND PHIX 

30 MEGACOOE 

3D MEGACOOE 

3D VOICE CHESS 





ABC 












* * 










* * 










* * 


K7 


160 


144 


110 


* 


DSK 


219 


197 


148 


* 


K7 


121 


109 


70 


* 


DSK 


177 


150 


126 


* 


K7 


112 


101 


78 


* * 


K7 


160 


128 


112 


* « 


DSK 


200 


160 


140 


* * 


K7 


121 


109 


65 


* 


DSK 


190 


171 


115 


** 


K7 


180 


162 


126 


* * 


DSK 


260 


234 


182 


** 


K7 


157 


141 


90 


* * 




* * 




#* 




• 




* 




* • 




* * 




* * 










* 








ABC 




30 VOICE CHESS 


DSK 


147 


132 


90 


* 


5 me AXE 


K7 


190 


152 


133 


* 


5 me AXE 


DSK 


200 


160 


140 


* * 


AFFAIRE VERA CRUZ 


K7 


160 


144 


128 


* * 


AFFAIRE VERA CRUZ 


DSK 


190 


171 


152 


* 


AIRWOLF 


K7 


109 


96 


63 


* 


AIRWOLF 


DSK 


157 


141 


96 


* * * 


ALIEN 


K7 


104 


94 


72 


* * * 


ALIEN 


DSK 


147 


132 


101 


* * * 


ALIEN 6 


K7 


110 


99 


78 


* * 


ALIEN BREAK- 1, 


K7 


104 


94 


76 


* * 


AM STRAM DAMES 


K7 


130 


117 


91 


* * 


AM STRAM DAMES 


DSK 


189 


170 


129 


* * 


AUTOFORM ATION ASSEMBLEUF 


K7 


193 


174 


138 


** 


AUTOFORMATION ASSEMBLEUF 


DSK 


295 


286 


207 


# 


BACK TO THE FUTURE 


K7 


115 


104 


83 


* 


BACK TO THE FUTURE 


DSK 


182 


163 


125 


* 


BAD MAX 


K7 


185 


167 


115 


* 


BAD MAX 


DSK 


196 


178 


120 


* * 


BALL BLAZER 


K7 


130 


117 


81 


* * 


BARRY MAC GUIGAN BOXING 


K7 


105 


95 


73 


* * 


BARRY MAC GUIGAN BOXING 


DSK 


182 


163 


127 


* * * 


BATAILLE D'ANGLETERRE 


DSK 


220 


196 


154 


# * # 







ABC 




BATAILLE D'ANGLETERRE 


K7 


140 


126 


96 


* * 


BATAILLE POUR MIDWAY 


DSK 


220 


196 


154 


* * 


BATTLE OF BRITAIN 


K7 


121 


109 


85 


* * 


BATTLE OF BRITAIN 


DSK 


160 


162 


126 


* * 


BEACH HEAD 


K7 


130 


117 


78 


* * 


BEACH HEAD 


DSK 


159 


152 


110 


**# 


BORED OF RINGS 


K7 


B5 


76 


59 


* * * 


BORED OF RINGS 


DSK 


190 


171 


115 


* * * 


BOULDER DASH 


K7 


100 


90 


63 


* 


BOUNTY BOB STRIKES BACK 


K7 


106 


95 


70 


* • * 


BRIAN'S BLOODAXE 


K7 


109 


96 


76 


* * * 


BRUCE LEE 


K7 


110 


99 


77 


* * * 


BRUCE LEE 


DSK 


170 


153 


115 


** 


CAVES OF DOOM 


K7 


30 


27 


20 


# * # 


CAULDRON 


K7 


96 


98 


70 


* * * 


CAULDRON 


DSK 


153 


138 


101 


* * # 


CHALLENGER REVERSI 


K7 


130 


117 


91 


* * * 


CHALLENGER REVERSI 


DSK 


169 


170 


129 


* * 


CHUCKIE EGG II 


K7 


114 


103 


80 


* * 


COBRA PINBALL 


K7 


140 


126 


97 


* * 


COBRA PINBALL 


DSK 


219 


197 


148 


* * * 


COLOSSUS CHESS 4 


K7 


119 


107 


82 


* # * 


COLOSSUS CHESS 4 


DSK 


15S 


140 


105 


* * * 



ABC 



COMBAT LYNX 

COMMANDO 

COMPUTER HrTS 6 

COMPUTERS HITS 10 

COMPUTERS HITS 10 II 

CONFUZZtON 

CRAFTON ET XUNK 

CRAFTON ET XUNK 

CRAZY GOLF 

CYRUS CHESS 

CYRUS CHESS 

DBASE 2 

DAMBUSTERS 

DAMS 

DAMS 

DARK STAR 

DATAMAT 

DEFEND OR DIE 

DEVIL 1 S CROWN 

DEVIL'S CROWN 

OEVPAC 

OEVPAC 

DIARY OF ADRIAN MOLE 



K7 


109 


96 


K7 


107 


96 


DSK 


162 


1 69 


K7 


121 


108 


K7 


121 


106 


K7 


67 


78 


K7 


140 


126 


DSK 


220 


196 


K7 


104 


94 


K7 


121 


109 


DSK 


155 


140 


DSK 


790 


711 


K7 


112 


101 


K7 


296 


266 


DSK 


395 


356 


K7 


64 


76 


DSK 


450 


405 


K7 


97 


87 


K7 


115 


104 


DSK 


169 


152 


K7 


305 


275 


DSK 


360 


324 


K7 


124 


112 



BULLETIN D'ADHESION AU CLUB HEBDOGICIEL 

A renvoyer a HEBDOGICIEL, Service VPC, 24 rue Baron 75017 PARIS 

(ECRIRE EN LETTRES CAPITALES) 

Oui, j'adhere des deux mains et des deux pieds au club Hebdogiciel. J'ai pris connaissance du reglement et je vous envoie le mien 
(de reglement), soit 150 francs pour un an. Je recevrai ma carte d'adherent sous une semaine et je suis content. 

Je choisis le badge n° 



Reglement joint : Cheque bancaire □ CCP D Etranger : mandat-poste international uniquement □ 



Norn Prenom 

Adresse 

Ville Code Postal.. 



Signature : 

■ Attention, si vous commandez des logiciels, utilisez le bon de commande au recto de celui-ci et faites deux cheques differents : un pour I'adhesion au ciub et un pour votre com- 
mando de logiciels ^^^^^ 



17 



1 — QA VIENT 


DE SORTIR 




AMSTRAD 












* * * 

* * * 

* * * 

* * 

* * 

* * * 
*** 


DOOMSDAY BLUES 

FRANKIE GOES TO HOLLYWOOD 

GET DEXTER 

PANZADROME 

RUNESTONE 

WAY OF THE TIGER 

WAY OF THE TIGER 


K7 
K7 
K7 
K7 
K7 
K7 
DSK 


121 
121 
121 
110 
98 
121 
182 


108 
108 
108 
99 
88 
108 
163 


85 

85 
85 
77 
68 
85 
127 


COMMODORE 












* 

* * 

* * 
* 


DR WHO 
ELECTRA GLIDE 
FAIRLIGHT 
SUPERBOWL 




K7 
K7 
K7 
K7 


145 
121 

121 
121 


130 
108 
108 
108 


101 
85 
85 
85 


SPECTRUM 












* * 

* * * 


BALLBLAZER 

WAY OF THE TIGER 




K7 
K7 


121 
121 


108 
108 


85 
85 


MSX 














* * 

* * * 

* * * 


BACKGAMMON 

CHORO Q 

WAY OF THE TIGER 




K7 
K7 

K7 


90 

90 

121 


81 
81 
108 


63 
63 
85 



DOPPLEGRANGER 

DRAGON TORC Of AVAL0N 

DUNDARACH 

DUNDARACH 

DUNGEON ADVENTURE 

DUO PACK FIGH EXL0 

EDEN BLUES 

EDEN BLUES 

ELECTRO FREDDY 

ELECTRO FREDDY 

ELIDON 

ELITE 

ELITE 

EMPIRE 

EMPIRE 

ESMERALD ISLE 

FANTASTIC VOYAGE 

FIGHTER PILOT 

FIGHTER PILOT 

FORMULA ONE 

FORTH 

FORTH 

FRANK BRUNO'S BOXING 

FRANK BRUNO'S BOXING 

FRANKENSTEIN 

GALAXIA 

GENESIS 

GESTE DARTILLAC 

GESTE DARTILLAC 

GRAFPAD 2 

GRAFPAD 2 

GYROSCOPE 

HACKER 

HACKER 

HARD HAT MAC 

HERBERT'S DUMMY RUN 

HI-RISE 

HI-RISE 

HIGHWAY ENCOUNTER 

HIGHWAY ENCOUNTER 

HMS COBRA 

HMS COBRA 

HOLD-UP 

HUNCHBACK II 

HYPERSPORT 

HYPERSPORT 

IMPOSSIBLE MISSION 

INFERNAL RUNNER 

INFERNAL RUNNER 

JAMMIN'S 

JET SET WILLY 

JUGGERNAUT 

KIT PROGRAMMEUR 

KNIGHTLORE 





AB C 


K7 


91 


82 


Ml 


K7 


m 


86 


67 


K7 


116 


'04 


81 


DSK 


140 


126 


87 


K7 


11? 


101 


78 


DSK 


229 


206 


138 


K7 


1*0 


i?6 


96 


DSK 


220 


196 


160 


K7 


104 


M 


72 


DSK 


147 


132 


101 


K7 


114 


103 


71 


K7 


155 


140 


95 


DSK 


185 


166 


120 


K7 


?10 


147 


147 


OSK 


310 


217 


217 


K7 


SB 


76 


59 


DSK 


155 


140 


112 


K7 


91 


82 


58 


DSK 


170 


153 


95 


K7 


92 


83 


69 


K7 


234 


211 


141 


DSK 


zn 


249 


195 


K7 


97 


87 


62 


DSK 


190 


isa 


108 


K7 


130 


117 


90 


K7 


74 


67 


49 


K7 


127 


114 


88 


K? 


290 


26- 


232 


DSK 


290 


261 


232 


K7 


941 


847 


705 


OSK 


990 


891 


765 


K7 


120 


106 


62 


K7 


121 


109 


85 


DSK 


155 


140 


100 


K7 


121 


116 


90 


K7 


121 


109 


85 


K7 


109 


96 


68 


DSK 


145 


131 


94 


K7 


115 


104 


63 


DSK 


124 


112 


86 


K7 


ISO 


162 


123 


DSK 


239 


215 


161 


K7 


120 


108 


83 


K7 


97 


87 


62 


K7 


1 10 


98 


76 


DSK 


157 


141 


110 


K7 


11? 


101 


76 


K7 


140 


126 


97 


DSK 


196 


178 


134 


K7 


1 14 


103 


71 


K7 


97 


87 


62 


K7 


91 


82 


58 


DSK 


499 


449 


330 


K7 


112 


101 


78 



ABC 



coxes 

* * * INDISPENSABLE 

* * RECOMMANDE 

* BON 



KONG STRIKES BACK 

LAZER BASIC 

LE SURVIVANT 

LOGO FRANCAIS 

LORDS OF MIDNIGHT 

LORDS OF MIDNIGHT 

LORDS OF THE RING 

LOR (GRAPH 

LORIGRAPH 

MACADAM BUMPER 

MACADAM BUMPER 

MANDRAGORE 

MANDRAGORE 

MANIC MINER 

MARSPORT 

MARSPORT 

MASTER OF MAGIC 

MASTER OF THE LAMPS 

MATCH POINT 

MELBOURNE PACK 

METRO 2018 

METRO 2018 

MEURTRE A GRANDE VITESSE 

MEURTRE A GRANDE VITESSE 

MEUTRES SUR LATLANTIQUE 

MEUTRES SUR LATLANTIQUE 

M1CHOSCRABBLE 

MICROSCRASBLE 

MINDSHAOOW 

MINDSHADOW 

MINIOFFICE 

MINIOFFICE 

MONTSEGUR 

MR WON'S LOOPY LAUNDRY 

MULTIPLAN 

NOMAD 

NEVER ENDING STORY 

NIGHT SHADE 

OMEGA PLANETE INVISIBLE 

ONE MAN ANS HIS DROIDS 

ORPHEE 

PACK FIVE 

PING PONG 

PLANETE BASE 

POUVOIR 

POUVOIR 

PROJECT FUTURE 

PUNCHY 



K7 


99 


89 


DSK 


236 


214 


K7 


117 


105 


DSK 


179 


161 


K7 


112 


101 


DSK 


158 


142 


K7 


194 


174 


K7 


210 


189 


DSK 


310 


279 


K7 


160 


144 


DSK 


240 


216 


K7 


250 


225 


DSK 


250 


225 


K7 


111 


100 


K7 


121 


109 


DSK 


132 


119 


K7 


45 


40 


K7 


124 


112 


K7 


96 


86 


K7 


121 


106 


K7 


190 


171 


DSK 


215 


194 


K7 


175 


158 


DSK 


239 


215 


K7 


220 


198 


DSK 


275 


248 


K7 


250 


225 


DSK 


295 


265 


K7 


114 


103 


DSK 


155 


140 


K7 


78 


66 


DSK 


127 


114 


K7 


139 


125 


K7 


104 


94 


DSK 


490 


441 


K7 


112 


101 


K7 


127 


114 


K7 


132 


119 


K7 


260 


225 


K7 


30 


27 


DSK 


340 


306 


DSK 


157 


141 


K7 


112 


101 


K7 


ISO 


135 


K7 


180 


162 


DSK 


200 


180 


K7 


114 


103 


K7 


104 


94 



PUNCHY 


DSK 


147 


132 


101 


PYJAMARAMA 


K7 107 


96 75 


PYJAMARAMA 


DSK 147 


132 101 


RAID 


K7 112 


101 78 


WD 


DSK 


161 


152 


106 


RAMBO 


K7 


109 


96 


68 


RASPUTINE 


K7 


94 


85 


69 


RED ARROWS 


K7 


163 


147 


76 


RED ARROWS 


DSK 


158 


142 


i08 


RED MOON 


K7 


87 


78 


62 


ROCCO 


K7 


114 


103 


63 


ROCKY HORROR SHOW 


K7 


97 


87 


63 


ROCKY HORROR SHOW 


DSK 


182 


163 


114 


SABRE WULF 


K7 


112 


101 


78 


SCRABBLE 


K/ 


112 


101 


m 


SCRABBLE 


DSK 


155 


140 


100 


SEAS OF BLOOD 


K7 


121 


109 


77 


SKYFOX 


K7 


129 


116 


90 


SORCERY 


K7 


95 


86 


73 


SORCERY 


DSK 


'60 


144 


105 


SORCERY PLUS 


K7 


140 


126 


96 


SORCERY PLUS 


DSK 


200 


180 


126 


SOULS OF 0ARCON 


K7 


114 


103 


80 


SOULS OF DARCON 


DSK 


178 


160 


121 


SOUTHERN BELLE 


K7 


106 


95 


66 


SPACE MOVING 


K7 


295 


266 


206 


SPACE MOVING 


DSK 


395 


356 


276 


SPACE SHUTTLE 


K7 


290 


261 


203 


SPELLBOUND 


K7 


45 


40 


31 


SPITFIRE 40 


DSK 


155 


140 


100 


SPITTFIHE 40 


K7 


107 


96 


68 


SPY HUNTER 


K7 


110 


99 


78 


SPY VS SPY 


K7 


147 


132 


64 


SPY VS SPY 


USK 


177 


159 


120 


SPY VS SPY II 


K7 


106 


96 


'8 


SPY VS SPY II 


DSK 


155 


140 


107 


STAR STRIKE 


K7 


80 


72 


59 


STARION 


K7 


125 


113 


n 


STEVE 0AVIS SNOOKER 


K7 


101 


91 


m 


STEVE DAVIS SNOOKER 


DSK 


153 


138 


104 


STRANGELOOP 


K7 


124 


112 


76 


SUPER PIPELINE II 


K7 


114 


103 


70 


SUPER PIPELINE II 


DSK 


124 


112 


n 


SUPER SILVER PACK 


K7 


142 


132 


90 


SUPER SLEUTH 


K7 


106 


96 


74 


SUPERPAINT 


DSK 


395 


356 


211 


TALES OF ARABIAN NIGHT 


K7 


85 


79 


59 


TANK BUSTER 


K7 


101 


91 


70 


TAPPER 


K7 


112 


101 


78 


TASCOPY 


K7 


'29 


116 


94 


TASCOPY 


DSK 


276 


248 


193 


TASWORD 


K7 


219 


'97 


155 


TASWORD 


DSK 


350 


316 


231 


TASWORD 6128 


DSK 


248 


223 


'48 


TAU CETI 


K7 


114 


103 


71 


TENNIS 3D 


K7 


150 


13b 


105 


TENNIS 30 


DSK 


200 


180 


14( 


TERROR MOI INOS 


K7 


114 


103 


70 


TEXTOMAT 


DSK 


450 


405 


316 


THE COVENANT 


K7 


87 


78 


69 


THE HOBBIT 


K7 


165 


149 


113 


THE ILLUSTRATOR 


K7 


256 


230 


171 


THE LAST V8 


K7 


45 


40 


31 


THE QUILL 


K7 


190 


171 


128 


THE QUILL 


DSK 


294 


265 


196 


THEATRE EUROPE FRANCAIS 


K7 


140 


126 


98 


THEATRE EUROPE FRANCAIS 


DSK 


220 


196 


154 


THEATRE EUROPE ANGLAIS 


DSK 


180 


162 


126 


THEY SOLD A MILLION 


K7 


121 


108 


85 


THEY SOLD A MILLION 


DSK 


182 


169 


127 


THEY SOLD A MILLION 2 


K7 


121 


106 


es 


THEY SOLD A MILLION 2 


DSK 


182 


169 


127 


THINK 


K7 


109 


98 


7« 


TORNADO LOW LEVEL 


K7 


98 


87 


67 


TORNADO LOW LEVEL 


DSK 


190 


171 


115 


TRIPLE PACK 


DSK 


180 


162 


114 


WARLORD 


K7 


99 


89 


7C 


WARRIOR 


K7 


143 


129 


102 


WARRIOR 


DSK 


183 


165 


131 


WAY OF EXPLODING FIST 


K7 


110 


99 


71 


WHO DARES WINS 


K7 


96 


86 


68 


WHO DARES WINS 


DSK 


17B 


160 


12? 


WHO DARES WINS II 


K7 


95 


86 


62 


WHO DARES WINS II 


DSK 


163 


147 


100 


WINTER SPORTS 


K7 


124 


112 


86 


WINTER SPORTS 


DSK 


155 


140 


100 


WIZARD LAIR 


K7 


i?2 


110 


71 


WIZARO LAIR 


DSK 


140 


126 


87 


WORKING BACKWARDS 


DSK 


178 


160 


12? 


WORLD CUP FOOTBALL 


K7 


97 


87 


62 


WORLD SERIE BASEBALL 


K7 


110 


98 


H 


YIE AR KUNG FU 


K7 


105 


95 


69 


YIE AR KUNG FU 


DSK 


155 


140 


100 


ZAXXON 


K7 


121 


109 


85 


ZORRO 


K7 


110 


99 


78 



ABC 



APPLE 



7 CITIES OF GOLD 

ADVENTURE CONSTRUCTION 

A.E 

AMERICAN ROAD RACE 

ANGLAIS 1 

ANGLAIS 2 

ANGLAIS 3 

ANGLAIS 4 

ANGLAIS 5 

ARCHON II 



200 


180 


140 


2O0 


180 


140 


269 


242 


90 


375 


338 


220 


425 


382 


325 


425 


382 


325 


425 


382 


325 


425 


38? 


325 


425 


38? 


325 


200 


180 


140 



AXIS ASSASSIN 

BACKGAMMON DYNACOMP 

BARD'S TALE 

BATTLE FOR NORMANDY 

BELLE AU BOIS DORMANT 

BRIDGE MASTER DYNACOMP 

BRUCE LEE 

CAPTAIN GOOONIGHT 

CARMEN OF SAN DIEGO 

CASTLE OF WOLFENSTEIN 

CENTIPEDE 

CHASSE AU MAGOT 

CHOPLIFTER 

COLOSSUS CHESS 4 

CONAN 

CRIME DU PARKING 

CRIOUE CROQUE CRAQUE 

DAEDALUS 

DALLAS QUEST 

DESIGNER PENCIL 



195 


175 


90 


249 


224 


90 


:tso 


342 


280 


350 


315 


135 


i95 


175 


50 


349 


314 


135 


245 


221 


180 


350 


315 


?50 


493 


444 


280 


244 


220 


90 


272 


245 


50 


195 


175 


60 


269 


242 


90 


396 


356 


238 


275 


246 


110 


•90 


171 


127 


100 


90 


50 


145 


130 


50 


195 


175 


90 


272 


245 


'70 



SUPPORTS 




DSK DISQUETTE 


K7 CASSETTE 


CAR CARTOUCHE 


S SOFTCARD 


* 


EPIDEMIE 


195 


176 


127 


* 


EVOLUTION 


195 


175 


50 




FEMME NE SUPPORTAIT PAAS 


195 


175 


127 




GESTION PRIVEE 


800 


720 


640 


• 


GHOSBUSTER 


328 


295 


200 


*4 


HACKER 


376 


338 


227 




HANSEL ET GRETEL 


195 


175 


50 




HERO 


27? 


245 


170 


* 


HOLD UP 


290 


261 


232 


* * * 


KARATEKA 


380 


34? 


238 


*** 


LITTLE COMPUTER PREOPLE 


350 


315 


230 


* * 


MANDRAGORE 


290 


261 


232 


* 


MAX THE GLOBE TROTTER 


800 


720 


350 


* 


MEME LES POMMES DE TERRE 


190 


171 


127 




MICRO SCRABBLE 


470 


423 


290 


# * * 


MOEBIUS 


680 


612 


430 




MOON PATROL 


195 


176 


50 


** 


MOVIE MAKER 


?00 


180 


140 


** 


MUR DE BERLIN 


195 


176 


127 


** 


MUSIC CONSTRUCTION 


200 


180 


140 


* 


OPERATION MERCURY 


390 


351 


270 




OURSONS COMPTENT 


195 


175 


50 




OURSONS S'AMUSENT 


195 


175 


50 


* 


PARANOIAK 


190 


171 


127 


* * 


PINBALL CONSTRUCTION 


200 


180 


140 


, 


PIFALL II 


333 


300 


190 




POOYAN 


255 


230 


90 


* 


PORTEFEUILLE BOURSIER 


1450 


1305 


1110 




RUEE VERS LOR 


100 


90 


50 


* 


SCOOP 


430 


38/ 


301 


* 


SKY BLAZER 


240 


816 


120 


* * * 


SKYFOX 


180 


162 


126 


* 


SPACE SHUTTLE 


328 


295 


190 


• * 


SPARE CHANGE 


29/ 


26/ 


90 




SPIDER EVASION 


134 


121 


98 


* * 


SUMMER GAMES II 


287 


240 


197 


* 


TEMPLE D'APSHAI 


195 


1/5 


50 


* 


ULTIMA III 


740 


666 


450 


#* 


WINTER GAMES 


297 


267 


224 


* 


WIZARDRY 1 


470 


423 


180 


# 


WIZARDRY 2 


323 


291 


120 


* 


WIZARDRY 3 


:*69 


332 


140 


* * 


XPER 


950 


855 


656 


* 


ZAXXON 


272 


245 


70 



A BC 



ATARI 



AMERICAN ROAD RACE 

AMERICAN ROAD RACE 

ARCADE CLASSICS 

ARCHON 

ARCHON 

ATTACK MUTANTS CAMELS 

AXIS ASSASSIN 

AXIS ASSASSIN 

BALLBLAZER 

BAtLBWtfER 

BATTLE OF NORMANDY 

BEACH HEAD 

BEACH HEAD 

BLUE MAX 

BLUE MAX 

BLUE MAX 2001 

BLUE MAX 2001 

BOULDERDASH 

BOULDERDASH 

BOULDERDASH II 

BOULDERDASH II 

BOUNTY BOB 

BRUCE LEE 

BRUCE LEE 

CHOP SUEY 

CHOP SUEY 

CHOPLIFTER 

COLOSSUS CHESS 

COLOSSUS CHESS 

COMBAT LEADER 

CONAN 

D-BUG 

D-BUG 

DAM BUSTER 

DECATHLON 

DECATHLON 

DROP ZONE 

EIDOLON 

ELECTRA GLIDE 

ELECTRA GLIDE 

ENCOUNTER 

F 15 STRIKE EAGLE 

F 15 STRIKE EAGLE 

FIGHTER PILOT 

FIGHTER PILOT 

FIVE A SIDE 

FLIP AND FLOP 

GHOST CHASER 

GHOSTBUSTERS 

GHOSTBUSTERS 

GOONIES 

GREMLINS 

HACKER 

HACKER 

HARD HAT MACK 

HARD HAT MACK 

JUMP JET 

JUMP JET 

KARATEKA 

KENNEDY APPORACH 

KENNEDY APPROCH 

KNIGHTS OF THE DESERT 



K7 


121 


109 


DSK 


180 


162 


K7 


121 


108 


K7 


145 


131 


DSK 


181 


163 


K7 


96 


86 


K7 


97 


87 


DSK 


115 


104 


DSK 


182 


164 


K7 


121 


109 


DSK 


292 


263 


DSK 


12! 


109 


K7 


112 


101 


K7 


112 


101 


DSK 


125 


11? 


K7 


121 


109 


DSK 


180 


162 


K7 


119 


107 


DSK 


162 


146 


K7 


121 


109 


DSK 


180 


162 


K7 


121 


109 


K7 


140 


126 


DSK 


180 


162 


K7 


109 


98 


DSK 


157 


141 


DSK 


225 


203 


K7 


121 


109 


DSK 


223 


201 


K7 


170 


153 


DSK 


170 


153 


K7 


97 


87 


DSK 


115 


104 


K7 


97 


87 


K7 


140 


126 


DSK 


180 


162 


K7 


121 


109 


DSK 


182 


164 


K7 


109 


98 


DSK 


152 


137 


K7 


125 


113 


K7 


121 


109 


DSK 


170 


153 


K7 


60 


54 


DSK 


130 


117 


K7 


90 


62 


DSK 


162 


146 


K7 


112 


101 


K7 


129 


116 


DSK 


150 


135 


K7 


112 


101 


K7 


114 


103 


K7 


121 


109 


DSK 


180 


162 


K7 


121 


109 


DSK 


125 


112 


K7 


114 


103 


DSK 


149 


134 


DSK 


380 


342 


K7 


169 


152 


DSK 


190 


171 


DSK 


330 


297 



KORONIS RIFT 

LODE RUNNER 

MEDIATOR 

MEDIATOR 

MERCENARY 

MERCENARY 

MIG ALLEY ACE 

MIG ALLEY ACE 

MINER 2049 

MOON SHUTTLE 

MOON SHUTTLE 

NATO COMMANDER 

ONE ON ONE 

ONE ON ONE 

PITFALL II 

PRINT SHOP 

REALM OF IMPOSSOBILITY 

RED MOON 

RESCUE Of FRACTALUS 

RESCUE OF FRACTALUS 

RIVER RAID 

ROAD RACE 

SMASH HITS 1 

SMASH HITS 2 

SMASH HITS 3 

SMASH HITS 4 

SMASH HITS 4 

SOCCER 

SOLO FLIGHT 

SOLO FLIGHT 

SPACE SHUTTLE 

SPIDERMAN 

SPIDERMAN 

SPITFIRE ACE 

SPY HUNTER 

SPY HUNTER 

SPY VS SPY 

SPY VS SPY 

SPY VS SPY 2 

SPY'S DEMISE 

SPY'S DEMISE 

STEVE DAVIS SNOOKER 

STEVE DAVIS SNOOKER 

STRIP POKER 

STRIP POKER 

SUMMER GAMES 

SUMMERGAMES II 

SUPER ZAXXON 

TAPPER 

TAPPER 

THE LAST V8 

ULTIMA III 

UP AND DOWN 

UP AND DOWN 

ZORRO 

ZORRO 



ATARI ST 



BORROWED TIME 

BRATACCAS 

CALENDAR 

COLOUR SPACE 

DEGAS 

DFT IBM/ST 

DISK HELP 

DOS SHELL MS/DOS EMULAT 

FLIP SIDE 

HACKER 

KISSED 

LANDS OF HAVOC 

M-COPY 

M-OISK RAM DISK 

MI-TERM 

MINDSHADOW 

MUD PIES 

SOFT SPOOL 

THE PAWN 

UTILITIES 

COMMODORE 



4 ZZAP ! SIZZLERS 

4 ZZAP ! SIZZLERS 

4 me PROTOCOLE 

4 me PROTOCOLE 

ADVENTURE CONSTRUCTION 

AIR WOLF 

AMERICAN ROAD RACE 

AMERICAN ROAD RACE 

ARCADE CLASSICS 

ARCADE HALL OF FAME 

ARCADE HALL OF FAME 

ARCHON 

ARCHON 

AXIS ASSASSIN 

AXIS ASSASSIN 

AZTEC 



DSK 


173 


156 


DSK 


42/ 


384 


K7 


109 


96 


OSK 


155 


140 


K7 


121 


109 


DSK 


15/ 


141 


K7 


121 


109 


DSK 


W5 


158 


K7 


168 


161 


K7 


74 


67 


DSK 


104 


94 


K7 


112 


101 


K7 


121 


109 


DSK 


157 


141 


K7 


125 


112 


OSK 


454 


409 


DSK 


15/ 


141 


K7 


124 


112 


K7 


121 


109 


DSK 


163 


147 


K7 


125 


112 


K7 


147 


132 


K7 


182 


146 


K7 


162 


146 


K7 


178 


160 


K7 


121 


109 


DSK 


157 


141 


CAR 


163 


147 


K7 


190 


171 


DSK 


210 


189 


K7 


129 


116 


K7 


101 


91 


OSK 


107 


96 


K7 


121 


109 


K7 


121 


109 


DSK 


170 


153 


K7 


121 


109 


DSK 


162 


146 


K7 


119 


107 


K7 


121 


109 


DSK 


170 


153 


K7 


112 


101 


DSK 


125 


11? 


DSK 


170 


153 


K7 


121 


109 


DSK 


157 


141 


DSK 


262 


236 


K7 


113 


102 


K7 


112 


101 


DSK 


170 


153 


K7 


45 


40 


DSK 


210 


189 


K7 


112 


101 


DSK 


'70 


153 


K7 


112 


101 


DSK 


170 


153 



ABC 



DSK 


365 


328 


DSK 


310 


279 


DSK 


410 


369 


DSK 


245 


220 


OSK 


245 


220 


DSK 


430 


387 


DSK 


365 


328 


DSK 


365 


328 


DSK 


365 


328 


DSK 


245 


220 


DSK 


310 


279 


DSK 


365 


328 


DSK 


245 


220 


DSK 


609 


548 


DSK 


157 


141 


DSK 


365 


328 


DSK. 


310 


279 


DSK 


245 


220 


DSK 


?45 


220 


DSK 


310 


279 


DSK 


430 


387 



K7 


121 


108 


DSK 


'82 


169 


K7 


157 


141 


DSK 


194 


174 


DSK 


160 


144 


K7 


97 


87 


K7 


121 


109 


DSK 


190 


171 


K7 


121 


106 


K7 


121 


106 


DSK 


182 


169 


K7 


145 


130 


DSK 


165 


149 


K7 


96 


87 


DSK 


120 


108 


DSK 


116 


104 



BACK TO THE FUTURE 

BALLBLAZER 

BALLBLAZER 

BARRY MAC CUM3AN BOXING 

BARRY MAC GUlGAN BOXING 

BATAILLE POUR MIOWAY 

BATTLE DANGLETERRE 

BATTLE FOR BRITAIN 

BATTLE FOR BRITAIN 

BEACH HEAD 

BEACH HEAD 

BEACH HEAD II 

BEACH HEAD II 

BLACKWHYCHE 

BLADE RUNNER 

SLUE MAX 

BLUE MAX 

BLUE MAX 

BLUE MAX 2001 

BORROWED TIME 

BOULDERDASH 

BOULDERDASH 

BOULDERDASH II 

BOUNDER 

BOUNDER 

BOUNTY BOB 

BOUNTY BOB 

BOZO'S NKjHT OUT 

BREAK DANCE 

BRIAN JACKS SUPERSTAR 

BRIAN JACKS SUPERSTAR 

BRUCE LEE 

BRUCE LEE 

BURNING RUBBER 

CARTOUCHE MEGAMEM 50 KO 

CASTEL DOCTOR CREEP 

CAULDRON 

CENTIPEDE 

CHARTBUSTER 

CHOPLIFTER 

CHOPLIFTER 

COLOSSUS CHESS 4 

COLOSSUS CHESS 4 

COMBAT LEADER 

COMBAT LYNX 

COMIC BAKERY 

COMMANDO 

COMMANDO 

COMPUTER HITS 10 

COMPUTER HITS 10 

COMPUTER HITS 10 II 

COMPUTER HITS 6 

CONAN 

COSMIC BOUNCE 

D-BUG 

DALLAS QUEST 

DAMBUSTERS 

OAMBUSTERS 

DAVIDS MIDNIGHT MAGIC 

DECATHLON 

DECATHLON 

DIARY OF ADRIAN MOLE 

DIG DUG 

DONALD DUCK 

DONALD DUCK 

DUN0ARACH 

DUNGEON ADVENTURE 

EIDOLON 

EIDOLON 

ELIDON 

ELIDON 

ELITE 



K7 


1 14 


103 


K7 


115 


104 


OSK 


160 


182 


K7 


130 


11/ 


DSK 


'60 


144 


K7 


140 


112 


K7 


140 


112 


K7 


120 


106 


DSK 


147 


151 


K7 


121 


109 


DSK 


155 


140 


K7 


121 


109 


DSK 


170 


153 


K7 


120 


108 


K7 


MO 


99 


K7 


'12 


101 


DSK 


'80 


162 


K7 


112 


101 


DSK 


ISO 


162 


DSK 


i60 


144 


K7 


109 


98 


DSK 


162 


146 


K7 


137 


123 


K7 


124 


112 


DSK 


155 


140 


K7 


120 


108 


DSK 


'80 


162 


K7 


80 


72 


K7 


in 


96 


K7 


109 


96 


DSK 


150 


135 


K7 


112 


101 


DSK 


180 


162 


K7 


31 


26 


CAR 


360 


324 


K7 


121 


109 


K7 


130 


117 


CAR 


150 


135 


K7 


100 


90 


K7 


121 


109 


CAR 


165 


148 


K7 


119 


107 


DSK 


178 


180 


K7 


160 


144 


K7 


106 


95 


K7 


109 


98 


K7 


90 


81 


DSK 


160 


144 


K7 


121 


108 


K7 


121 


108 


K7 


121 


108 


K7 


97 


87 


DSK 


170 


153 


K7 


80 


72 


DSK 


120 


108 


DSK 


'79 


161 


K7 


110 


99 


DSK 


170 


153 


K7 


118 


104 


K7 


124 


112 


DSK 


140 


126 


K7 


124 


112 


CAR 


170 


153 


K7 


112 


101 


DSK 


155 


140 


K7 


120 


108 


K7 


HO 


99 


K7 


121 


109 


DSK 


170 


153 


K7 


119 


107 


DSK 


196 


176 


K7 


155 


140 



PRIX 




A : 


PRIX TARIF 


B : 


PRIX ABONNE 


C 


PRIX CLUB 



ELITE 

ENIGMA FORCE 

EXTRA TOOL 

EXTRA TOOL 

FAST LOAD CARTOUCHE 

FIGHT NIGHT 

FIGHT NIGHT 

FIGHTER PILOT 

FIGHTER PILOT 

FIGHTING WARRIOR 

FIONA RIDES OUT 

FIVE A SIDE FOOTBALL 

FLIGHT SIMULATOR II 

FORTH 

FRANK BRUNO'S BOXING 

FRANK BRUNO'S BOXING 

FRANKIE GOES HOLLYWOOD 

FRANKIE GOES HOLLYWOOD 

FRIDAY THE 13 TH 

FRIDAY THE 13 TH 

GENESIS 

GHETTO BLASTER 

GHOSBUSTER 

GHOSBUSTER 

GOONIES 



DSK 


215 


194 


K7 


121 


109 


K7 


245 


221 


DSK 


246 


221 


CAR 


264 


238 


K7 


112 


101 


DSK 


160 


144 


K7 


119 


107 


DSK 


144 


130 


K7 


107 


96 


K7 


92 


83 


K7 


72 


65 


DSK 


644 


580 


DSK 


350 


315 


K7 


96 


87 


DSK 


149 


134 


K7 


121 


109 


DSK 


170 


153 


K7 


114 


103 


DSK 


133 


120 


DSK 


150 


135 


K7 


105 


95 


K7 


124 


112 


DSK 


180 


162 


K7 


115 


104 




QUICKSH0T II 



Le baton de joie le 
plus vendu dans le 
monde. Plus de 4 
millions d'adeptes ! 



A 


B 


C 


85 


76 


56 



BON DE COMMANDE A DECOUPER OU A RECOPIER : HEBDOGICIEL VPC, 24 RUE BARON, 75017 PARIS 

Determinez vous-meme le prix auquel vous avez droit. Colonne C pour les membres du club. Colonne B pour les abonnes. Colonne A pour les visiteurs. 



Nom Prenom . . 

Adresse 

Ville Code postal 



Date de la commande : 

Les cheques recus ne seront encaisses qu'apres la livraison des materiels commandes. Cheque renvoye en 

cas de rupture de stock 



Tarif C : N° de carte de club obligatoire : 
Tarif B : N° d'abonne obligatoire. : 



Reglement joint : Cheque bancaire D CCP □ Etranger : mandat-poste international uniquement D 





Log. 


Ord. 


Support 


Tarif 


Prix 


Quant. 


Montant 


ex. : 


Pacpoc 


Oric Atmos 


Disquette 


C 


121 


2 


242 


iJEHOHgiHfT*" 


TOTAL : 

Participation aux frais de port : 

MONTANT A PAYER : 


15,00 







18 



GOONIES 

GROGGS REVENGE 

GYROSCOPE 

GYROSCOPE 

HERO 

HACKER 

HACKER 

HARD BALL 

HARD BALL 

HARD HAT MACK 

HARD HAT MACK 

HERBERTS DUMMY RUN 

HUNCHBACK II 

HYPER BIKER 

IMPOSSIBLE MISSION 

IMPOSSIBLE MISSION 

INDIANA JONES 

INFERNAL RUNNER 

INTERNATIONAL SOCCER 

JAMMIN 

JAMMIN 

JUMP JET 

JUMP JET 

KARATEKA 

KAHATEKA 

KENNEDY APPROACH 

KENNEDY APPROACH 

KENSINGTON 

KONG STRIKES BACK 

KORONIS RIFT 

KORONIS RIFT 

KUNG FU MASTER 

KUNG FU MASTER 

KWICK COPY 

LAZY JONES 

LAW OF THE WEST 

LAW OF THE WEST 

LITTLE COMPUTER PEOPLE 

LITTLE COMPUTER PEOPLE 

LODE RUNNER 

LODE RUNNER 

LORDS OF MK3NK3HT 

LORDS OF THE RINGS 

MACADAM BUMPER 

MACHINE LIGHTING 

MAIL ORDER MONSTERS 

MANDRAGORE 

MANDRAGORE 

MANIC MINER 

MASK OF THE SUN 

MASQUERADE 

MASTER OF MAGIC 

MASTER OF THE LAMP 

MATCH POINT 

MAX ASSEMBLEUR 

MELBOURNE PACK 

MERCENARY 

MERCENARY 

M1CROSCRABBLE 

MIG ALLEY ACE 

MIG ALLEY ACE 

MINDSHAOOW 

MINDSHADOW 

MOEBIUS 

MONSTER TRIVIA 

MOON SHUTTLE 

MOON SHUTTLE 

NICK FALDO GOLF 

NIGHT MISSION PINBALL 

NIGHT MISSION PINBALL 

NIGHTSHADE 

NODES OF YESOO 

NOW GAMES 

NOW GAMES 2 

OMEGA PLANETE INVISIBLE 

OMEGA PLANETE INVISIBLE 

ON COURT TENNIS 

ONE ON ONE 

ONE ON ONE 

OPERATION CYBORG 

OPERATION WHIRLWIND 

OPERATION WHIRLWIND 

OUTLAWS 

PARADROID 

PARADROID 

PASCAL 64 

PASTFINDER 

PASTFINDER 

PINBALL CONSTRUCTION 

PINBALL CONSTRUCTION 

PING PONG 

PITSTOP II 

PITSTOP H 

POLE POSITION 

POOYAN 

PSI WARRIOR 

PSYTRON 

RACING DESTRUCTION SET 

RACING DESTRUCTION SET 

RAID OF BUNGELING BAY 

RAID OVER MOSCOU 

RAID OVER MOSCOU 

RAMBO 

RAMBO 

REALM OF IMPOSSIBILITY 

REALM OF IMPOSSIBILITY 

RED ARROW 

RED MOON 

RESCUE ON FRACTALUS 

RESCUE ON FRACTALUS 

REVS 

REV'S 

RIVER RAID 

RIVER RAID 

ROAD RACE 

ROAD RACE 

ROBIN OF THE WOOD 

ROCK'N WRESTLE 

ROCK'N WRESTLE 

ROCKY HORROR SHOW 

ROCKY HORROR SHOW 

RUPPEMT 

SABRE WULF 

SABRE WULF 

SCARABEUS 

SCARABEUS 

SCHIZOPHRENIA 

SCUBA DIVE 

SEVEN CITIES OF GOLD 

SHADOW FIRE 

SHADOW FIRE 

SHERLOCK HOLMES 

SKYFOX 

SKYFOX 

SLAPSHOT 

SOLO FLIGHT 

SORCERY 

SPACE DOUBT 

SPACE PILOT II 

SPACE PILOT II 

SPACE SHUTTLE 

SPACE SHUTTLE 

SPEED KING 

SPEED KING 

SPEELBOUND 

SPELUNKER 

SPELUNKER 

SPITFIRE 40 

SPITFIRE ACE 

SPLATSHOT 

SPY VS SPY 

SPY VS SPY 

SPY VS SPY II 

SPY VS SPY II 

SPY'S DEMISE 

SPY'S DEMISE 

STAFF OF KARNATH 

STAR LEAGUE BASEBALL 

STARON 

STARON 

STEALTH 

STELLAR 7 

STEVE DAVIS SNOOKER 

STRIP POKER 

SUMMERGAMES 

SUMMERGAMES 

SUMMERGAMES II 

SUPER SILVER PACK 

SUPERBOWL 

SUPERPIPELINE II 

SUPERZAXXON 

SUPERZAXXON 

TALES OF ARABIAN NIGHT 



DSK 


K7 


K7 


DSK 


K7 


K7 


DSK 


K7 


DSK 


K7 


DSK 


K7 


K7 


K7 


K7 


DSK 


K7 


K7 


CAR 


K7 


DSK 


K7 


DSK 


K7 


DSK 


K7 


DSK 


h7 


K7 


K7 


DSK 


K7 


DSK 


DSK 


K7 


K7 


DSK 


K7 


DSK 


K7 


DSK 


K7 


K7 


K7 


K7 


DSK 


K7 


DSK 


K7 


DSK 


DSK 


K7 


K7 


K7 


K7 


K7 


K7 


DSK 


K7 


K7 


DSK 


K7 


DSK 


K7 


K7 


K7 


DSK 


K7 


K7 


DSK 
K7 



K7 


k; 


K7 


K7 


DSK 


DSK 


K7 


DSK 


K7 


K7 


DSK 


K7 


K7 


DSK 


DSK 


K7 


DSK 


K7 


DSK 


K7 


K7 


DSK 


K7 


DSK 


K7 


K7 


K7 


DSK 


K7 


K7 


DSK 


K7 


DSK 


K7 


DSK 


K7 


K7 


K7 


DSK 


K7 


DSK 


K7 


DSK 


K7 


DSK 


K7 


K7 


DSK 


K7 


DSK 


K7 


K7 


DSK 


K7 


DSK 


K7 


K7 


DSK 


K7 


DSK 


K7 


K7 


DSK 


K7 


K7 


K7 


K7 


K7 


DSK 


K7 


DSK 


K7 


DSK 


K7 


K7 


DSK 


K7 


K7 


DSK 


K7 


DSK 


K7 


DSK 


K7 


DSK 


K7 


K7 


DSK 


K7 


K7 


DSK 


K7 


K7 


K7 


DSK 


DSK 


K7 


K7 


K7 


K7 


DSK 


K7 



A 


B 


C 


ISO 


144 


115 


129 


116 


80 


97 


87 


62 


160 


144 


100 


125 


113 


86 


110 


99 


81 


1*4 


130 


103 


120 


106 


83 


150 


135 


110 


121 


109 


84 


140 


126 


100 


120 


106 


83 


96 


87 


67 


100 


90 


40 


100 


96 


76 


190 


171 


128 


120 


106 


83 


190 


182 


126 


178 


160 


121 


91 


82 


56 


116 


104 


72 


111 


100 


77 


140 


128 


96 


121 


108 


84 


380 


342 


224 


120 


106 


83 


ISO 


135 


110 


145 


131 


100 


9i 


62 


64 


121 


109 


85 


165 


149 


117 


112 


101 


76 


170 


153 


115 


295 


266 


207 


ao 


72 


40 


111 


100 


76 


150 


135 


110 


105 


95 


71 


160 


144 


109 


121 


109 


84 


140 


126 


95 


107 


96 


66 


165 


146 


105 


96 


87 


65 


304 


274 


202 


160 


144 


108 


250 


225 


200 


250 


225 


200 


64 


58 


43 


190 


162 


90 


150 


135 


110 


45 


40 


31 


124 


112 


82 


96 


87 


67 


195 


176 


137 


70 


83 


40 


114 


103 


71 


144 


130 


99 


257 


231 


182 


112 


101 


78 


170 


153 


115 


120 


106 


83 


250 


225 


156 


120 


108 


83 


112 


101 


78 


90 


81 


47 


125 


112 


76 


121 


109 


84 


250 


225 


130 


250 


225 


130 


121 


109 


84 


121 


109 


84 


110 


99 


66 


102 


92 


75 


250 


225 


200 


250 


225 


200 


124 


112 


77 


121 


109 


84 


160 


144 


95 


140 


128 


96 


140 


126 


93 


160 


144 


108 


112 


101 


78 


100 


90 


58 


132 


119 


91 


350 


315 


245 


99 


89 


72 


145 


131 


104 


180 


162 


109 


18? 


169 


127 


112 


101 


82 


110 


99 


77 


145 


130 


101 


112 


101 


78 


250 


225 


90 


100 


90 


70 


96 


87 


67 


157 


141 


110 


182 


164 


127 


121 


109 


84 


112 


101 


78 


157 


141 


110 


97 


87 


69 


132 


119 


91 


121 


109 


84 


160 


144 


100 


109 


98 


76 


85 


78 


59 


130 


117 


82 


144 


130 


103 


175 


158 


126 


215 


194 


145 


106 


95 


77 


250 


225 


145 


114 


103 


78 


153 


136 


110 


114 


103 


80 


120 


106 


83 


155 


139 


106 


97 


87 


69 


134 


121 


91 


96 


87 


67 


112 


101 


78 


155 


139 


106 


120 


106 


83 


145 


131 


105 


96 


B7 


64 


60 


72 


40 


182 


167 


127 


124 


112 


77 


173 


156 


117 


180 


144 


117 


120 


106 


83 


157 


141 


110 


97 


B7 


08 


'60 


1*4 


117 


109 


96 


80 


97 


67 


62 


89 


80 


63 


127 


114 


88 


118 


104 


72 


250 


225 


145 


107 


96 


68 


137 


123 


9* 


45 


*0 


31 


121 


109 


84 


131 


121 


96 


121 


109 


84 


112 


101 


78 


140 


126 


96 


112 


101 


78 


14S 


130 


101 


121 


109 


84 


145 


130 


101 


112 


101 


78 


170 


153 


115 


112 


101 


78 


130 


117 


85 


152 


137 


103 


111 


100 


77 


121 


109 


84 


150 


135 


95 


97 


87 


67 


112 


101 


78 


115 


10* 


88 


180 


162 


128 


180 


162 


128 


142 


127 


90 


121 


106 


65 


99 


89 


63 


110 


99 


71 


170 


153 


115 


61 


73 


52 



ABC 



TALES OF ARABIAN NIGHT 

TAPPER 

TAPPER 

TERROR MOLINOS 

THE HOBBIT 

THE HOBBIT 

THE LAST V8 

THE MUSIC STUDIO 

THE MUSIC STUDIO 

THEATRE EUROPE 

THEY A SOLD MILLION 

THEY A SOLD MILLION M 

THEY SOLD A MILLION 

THEY SOLD A MILLION II 

THING ON A SPRING 

THING ON A SPRING 

TIR NA NOG 

TORNADO LOW LEVEL 

TOURNAMENT TENNIS 

TOY BIZARRE 

ULTIMA III 

UNDEHWURLDE 

UNDERWURLDE 

UP AND DOWN 

URIDIUM 

URIDIUM 

V1RGULE 

VIRGULE SENIOR 

WAY OF EXPLODING FIST 

WAY OF EXPLODING FIST 

WHIRLINURD 

WHO DARES WINS II 

WHO DARES WINS II 

WILD WEST 

WILD WEST 

WINNIE THE POOH 

WINTERGAMES 

WINTERGAMES 

WIZARD 

WIZARD 

WIZARD 

WIZARD 

WIZARDRY 

WIZARDRY 

WIZARDS LAIR 

WORLD SERIES BASEBALL 

XPER 

YIE AR KUNG FU 

Z 

ZAXXON 

ZENJI 

ZORKI 

ZORK II 

ZORK III 

ZORRO 

ZORRO 



ORIC 



1815 

3 D FONGUS 

3 DMAZE 

3 D OXO BG 

3D INVADERS 

3D MUNCH 

A VIEW TO A KILL 

AFFAIRE EN OR 

AIGLE DOR 

AOT CYBERMEN 

ARCHERONS RAGE 

ASSEMBLER DISSASEMBLER 

ASSIMIL ANGLAIS 

ASSIMIL ANGLAIS 

ASSIMIL ESPAGNOL 

ASSIMIL ESPAGNOL 

ATLANTIS 

AUTHOR 

BASIC ETENDU 

BASIC PLUS 

BASIC TURBO 

BUDGET FAMILIAL 

BUGS BUSTER 

BUSINESSMAN 

CHALLENGE VOILE 

CHALLENGER 

CHALLENGER REVERSI 

CHARACTER 

CHESS 

CHESS II 

COBRA 

COBRA PINBALL 

COLOSAL ADVENTURE 

COMPILATEUR GRAPHIQUE 

COURS DE SOLFEGE 

CRIBBAGE 

CRYPT-SHOW 

D.A.O 

DAMSBUSTER 

DATASAVE 

DEDAL 

DEFENSE FORCE 

DIAMANT ILE MAUDITE 

DON JUAN ET DRAGUEURS 

DON'T PRESS LETTER O 

DOSSIER G 

DRACULAS REVENGE 

DRAUGHTS 

DURENDAL 

ELECTRO STROM 

EXTENDED BASIC 

FLIGHT 401 

FLIPPER 

FORMULE 1 

FORMULE 1 

FORTH 

FRELON 

FRIGATE COMMANDER 

GALAXIANS 

GEST 

GHOST GOBBLER 

GHOSTMAN 

GRAPHIX LORIGRAPH 

GRAPHOLOQIE 

GREEN GROSS TOAD 

HADES 

HARIEH ATTACK 

HUNCH BACH 

ICE GIANT 

IMAGES 

INITIATION C.A.O 

INSECT INSANITY 

INVADERS 

ISLAND OF DEATH 

KITECRAN 

LA CITE MAUDITE 

LE DERNIER METRO 

LE MILLIONAIRE 

LE SPECTRE D'ANNUBIS 

LOGO 

LONE RAIDER 

LORITEL 

M.A.R.C 

MACADAM BUMPER 

MASTER PAINT 

MEURTRE A GRANDE VITESSE 

MICROGFO 

MISSION DELTA 

MONITEUR DESSASEMBLEUR 

MONOPOLY 

MONTSEGUR 

MOTS CHOISES 

MOTS CROISES 

MR WIMPY 

MS-TEL SEDORIC 

MS-TEL JAASMIN 

MULTK3AMES 1 

MUSHROOM MANIA 

MYSTERE KIKEKANKOI 

NIBBLE SEDORIC 

OBJECTIF ELYSEE 

OflDI TIERCE 

ORIC BASE 

ORIC CALC 

ORIC FLIGHT 

ORIC MON 

ORIC MUNCH 

ORK3RAPH 

OR (GRAPH 

PASTA BLASTA 



DSK 


150 


135 


K7 


112 


id 


DSK 


170 


153 


K7 


101 


91 


K7 


167 


150 


DSK 


167 


150 


K7 


*5 


40 


K7 


129 


116 


DSK 


239 


215 


K7 


140 


126 


K7 


121 


106 


K7 


121 


106 


DSK 


182 


169 


DSK 


182 


169 


K7 


96 


87 


DSK 


120 


108 


K7 


114 


103 


K7 


83 


75 


DSK 


196 


178 


DSK 


250 


225 


DSK 


170 


153 


K7 


120 


108 


DSK 


155 


139 


K7 


112 


101 


K7 


105 


95 


DSK 


150 


135 


K7 


350 


315 


DSK 


750 


675 


K7 


100 


90 


DSK 


170 


153 


K7 


120 


106 


K7 


97 


87 


DSK 


163 


147 


K7 


121 


109 


DSK 


157 


141 


DSK 


ISO 


135 


K7 


110 


99 


DSK 


185 


167 


K7 


121 


109 


OSK 


157 


141 


K7 


121 


109 


DSK 


157 


141 


K7 


121 


109 


DSK 


150 


135 


K7 


120 


106 


K7 


95 


87 


DSK 


950 


855 


K7 


109 


96 


K7 


145 


131 


DSK 


150 


136 


K7 


100 


90 


DSK 


100 


90 


DSK 


100 


90 


DSK 


100 


90 


K7 


105 


95 


DSK 


170 


153 



K7 


160 


144 


K7 


160 


144 


K7 


62 


56 


K7 


85 


77 


K7 


41 


37 


K7 


130 


117 


K7 


114 


103 


K7 


144 


130 


K7 


200 


180 


K7 


85 


77 


K7 


80 


72 


K7 


80 


72 


K7 


290 


225 


DSK 


300 


270 


K7 


250 


225 


DSK 


300 


270 


K7 


1*0 


128 


K7 


130 


117 


K7 


97 


87 


K7 


120 


106 


K7 


1*0 


126 


K7 


160 


1*4 


K7 


120 


106 


K7 


1*0 


126 


K7 


130 


117 


K7 


125 


113 


K7 


130 


117 


K7 


100 


90 


K7 


58 


52 


K7 


41 


37 


K7 


120 


108 


K7 


120 


108 


K7 


31 


28 


K7 


250 


225 


K7 


218 


196 


K7 


56 


52 


K7 


92 


63 


K7 


100 


90 


K7 


58 


52 


K7 


100 


90 


K7 


106 


95 


K7 


60 


72 


K7 


160 


162 


K7 


135 


122 


K7 


56 


52 


K7 


133 


120 


K7 


60 


72 


K7 


58 


52 


K7 


120 


106 


K7 


60 


72 


K7 


112 


101 


K7 


74 


67 


K7 


160 


1*4 


K7 


130 


117 


DSK 


189 


170 


K7 


97 


87 


K7 


1300 


117 


K7 


55 


50 


K7 


ao 


72 


K7 


12* 


112 


K7 


62 


56 


K7 


106 


95 


K7 


310 


279 


K7 


1*0 


128 


K7 


62 


56 


K7 


250 


225 


K7 


*6 


43 


K7 


58 


52 


K7 


80 


72 


K7 


106 


95 


K7 


200 


180 


K7 


58 


52 


K7 


62 


56 


K7 


7* 


67 


K7 


120 


106 


K7 


140 


126 


K7 


139 


125 


K7 


120 


106 


K7 


139 


125 


K7 
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PLANETE BLEUE 

PLAYGROUND 

POLYFICHIER 

PROBE 3 

R-V DE LA TERREUR 

RAT SPLAT 

SAGA 

SCUBA DIVE 

SECRET DU TOMBEAU 

SPACE WALL 

STRESS 

SUPER JEEP 

SUPER METEORS 

SUPERCOPY 

SUPERFAUIT 

TALISMAN 

TERMINUS 

THE OUILL 

TITAN 

TRESOR DU PIRATE 

TRIATHLON 

TRICK SHOT 

TYRANN 

ULTIMA ZONE 

VORTEXT 

WORLD WAR 3 

XENON 1 

XENON 3 

ZEBBIE 

ZODIAC 

ZORGONS REVENGE 



K7 


114 


103 


K7 


96 


79 


K7 


166 


151 


K7 


62 


56 


K7 


95 


96 


K7 


41 


37 


K7 


150 


135 


K3 


46 


43 


K7 


150 


135 


K7 


76 


66 


K7 


120 


108 


K7 


160 


144 


K7 


80 


72 


K7 


120 


106 


K7 


02 


56 


K7 


107 


96 


K7 


120 


106 


K7 


190 


162 


K7 


107 


96 


K7 


94 


85 


K7 


150 


135 


K7 


62 


56 


K7 


165 


149 


K7 


80 


72 


K7 


270 


243 


K7 


88 


79 


K7 


97 


87 


K7 


94 


85 


K7 


62 


56 


K7 


31 


28 


K7 


97 


87 



MSX 



A VIEW TO A KILL 


K7 
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ADAPTATEUR SOFTCARD 
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99 


ALIEN 8 


K7 
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ALPHA SQUADRON 


CAR 


248 


ANTARTIC ADVENTURE 


CAR 
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ATHELIC LAND 


CAR 
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BACKGAMMON SOFTCARD 
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199 


BARNSTORMER SOFTCARD 


s 
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BATTLE OF MIDWAY 
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114 


BEAMRIDER 


K7 


157 


BINARY LAND 
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96 


BLAGGER 


K7 
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BOARD GAMES 1 


K7 
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BOARDELLO 
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BOOGABOO 


K7 
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BOULDER DASH 


K7 
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BUZZ OFF 
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ROAD FIGHTER 
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SLAP SHOT 
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SNOWBALL 


K7 


112 
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SPACE TROUBLE 
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SUPER BILLARD 
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SUPER CHESS 


K7 


92 


SUPER COBRA 
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TAROT 


K7 


236 


TENNIS 
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TEX 


K7 


239 


TEX 
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THE HOBBIT 


K7 
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THE WRECK 


K7 


11* 


THE WRECK SOFTCARD 
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279 


TIME PILOT 


CAR 


199 


TRACK AND FIELDS 1 
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TRACK AND FIELDS II 


CAR 


180 


X07 COMMUNICATION 


K7 


337 


XYLOLOG SOFTCARD 


S 


159 


XYZOLOG 


K7 


95 


YIE AR KUNG FU 


CAR 


2*0 


ZAXXON 


K7 


119 



SPECTRUM 



3 D MOVER 

3 WEEKS IN PARADISE 

4 me PROTOCOLS 
AIR WOLF 
ALIEN 8 
ANDROID 

ARCADE HALL OF FAME 
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109 
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94 
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110 


99 


K7 


66 


59 
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121 


109 



ARCHON 

ART STUDIO 

ASTRO CLONE 

ATIC AT AC 

B.C'S QUEST FOR TIRE 

BACK PACKERS 

BACK TO SKOLL 

BACK TO THE FUTURE 

BALLE DE MATCH 

BARRY MAC GUIGAN BOXING 

BATAILLE D'ANGLETERRE 

BATAILLE POUR MIDWAY 

BATTLE OF THE PLANET 

BATTLE OF THE PLANET 

BEACH HEAD 

BEAR BOWER 

BLADE RUNNER 

BLUE MAX 

BORED ON THE RING 

BOUNTY BOB STRIKES BACK 

BRIDGE PLAYER 3 

BRUCE LEE 

BUCKS ROGERS 

CHESS THE TURK 

COMBAT LYNX 

COMMANDO 

COMPUTER HITS 10 

COMPUTER HITS 10 II 

CONFUZON 

CORN CROPPER 

COSMICS WAR TOADS 

CRITICAL MASS 

CROCKY 

DAILEY THOMSON DECATHLON 

DALLAS 

DAMBUSTERS 

DARK STAR 

DEATH WAKE 

DOOMSDARK REVENGE 

DUNDARACH 

DUNGEON ADVENTURE 

DYNAMITE DAN 

EDITOR ASSEMBLER 

ELITE 

EMERALD ISLE 

ENIGMA FORCE 

EVIL CROWN 

FAIR LIGHT 

FIGHTER PILOT 

FIGHTING WARRIOR 

FORBIDDEN PLANET 

FORMULA ONE 

FRANK BRUNO BOXING 

FRANK GOES TO HOLLYWOOOt 

GALAXIANS 

GERRY THE GERM 

GIFT FROM THE GODS 

GLADIATOR 

GLASS 

GO TO HELL 

GOONIES 

GUNFRIGHT 

GYRON 

GYROSCOPE 

H.E.R.O 

HACKER 

HERBERT'S DUMMY RUN 

HIGWAYY ENCOUNTER 

HOBBIT 

HULK 

HUNCHBACK 

HUNCHBACK II 

HYPERSPORTS 

ILE MAUDITE 

IMPOSSIBLE MISSION 

INTERCEPTEUR COBALT 

INTERNATKJNAL KARATE 

JAWS 

JET SET WILLY 

JET SET WILLY II 

JEU DE DAMES 

JUGGERNAUT 

KNIGHT LORE 

KONG STRIKES BACK 

KOROTONI WILF 

LAZY JONES 

LODE RUNNER 

LOMBRICS 

LORDS OF MIDNIGHT 

LORDS OF THE RING 

LORIGRAPH 

MACADAM BUMPER 

MANAGER 

MANDRAGORE 

MANIC MINER 

MANOIR OR GENIUS 

MARSPORT 

MASTTER OF MAGIC 

MATCH DAY FOOTBALL 

MATCH POINT TENNIS 

MEGAHITS 10 

METABOLIS 

MICRO OLYMPICS 

MICRO SCRABBLE 

MIKIE 

MINDSHADOW 

MISTER FREEZE 

MONOPOLY 

MOON CRESTA 

MORDON'S QUEST 

MOVIE 

MUGSY 2 

MUGSY/HELLFIRE 

NOMAD 

NEVER ENDING STORY 

NICK FALDO GOLF 

NIGHT GUNNER 

NIGHTSHADE 

NODES OF YESOD 

NOW GAMES 

NOW GAMES II 

ON THE RUN 

ONE MAN AND HIS DROID 

ONE ON ONE 

PANIOUF. 

PANZADROME 

PAWS 

PEDRO 

PING PONG 

POINTING JOE 

PRINT PLUS 

PROFANATION 

PROJECT FUTURE 

PSYCHEDELIA 

PSYTRON 

RAID OVER MOSCOU 

RAMBO 

RASPUTIN 

REALM OF IMPOSSIBILITY 

RIDDLER'S DEN 

RIVER RAID 

ROBIN OF SHERLOCK 

ROBIN OF SHERWOOD 

ROBIN OF THE WOOD 

ROCKY HORROR SHOW 

ROLAND'S RAT RACE 

ROLLER COASTER 

RUNESTONE 

RUPPERT 

SABOTEUR 

SABRE WULF 

SCHtZOPHENIA 

SCUBA DIVE 

SHADOW OF THE UNICORN 

SHADOWFIRE 

SHERLOCK HOLMES 

SIR FRED 

SIR LANCELOT 

SKYFOX 

SOFTWARE STAR 

SORCERY 

SORDERON S SHADOW 

SOULS OF DRAGON 

SOUTHERN BELLE 

SPACE SHUTLE 

SP1DERMAN 

SPITFIRE 40 

SPORTS HERO 

SPY HUNTER 

SPY VS SPY 

STAR SEEKER 

STAR STRIKE 

STARBLITZ 
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STAR ION 

STARQUAKE 

STEVE DAVIS SNOOKER 

STCNKERS 

SUPER CHESS 3 5 

SUPER PIPELINE II 

SUPER SILVER PACK 

SUPERBOWL 

SWEEVOSS WOLRD 

SWORD AND SORCERY 

TALES OF ARABIAN NIGHTS 

TAPPER 

TAU CETI 

TERROR MELINOS 

THAT'S THE SPIRIT 

THE BUGGLE 

THE COVENANT 

THE CUSTARD KID 

THE DUKES OF HAZZARO 

THE LAST V8 

THE LEGEND OF AVALON 

THE RATS 

THEATRE EUROPE 

THEY SOLD A MILLION 

THEY SOLD A MILLION II 

THINK 

TIR NA NOG 

TOMAHAWK 

TOY BIZARRE 

TRASHMAN 

TRAVEL WITH TRASHMAN 

UNDERWULDE 

VOX 

WAY OF EXPLODING FIST 

WINTER SPORT 

WINTERGAMES 

WIZARD LAIR 

WORLD CUP 

WORLD SERIES BASEBALL 

WORLD SERIES BASKETBALL 

XCEL 

YIE AR KUNG FU 

ZAXXON 

ZENJI 

ZIP ZAP 

ZORRO 

ZZOOMM 
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THOMSON 



1615TO7f70 

3D KIT 

5m« AXE 

AFFAIRE VERA CRUZ 

AIGLE DOR 

AIR ATTACK 

AN OROIDES 

ANGLAIS 1 

ANGLAIS 2 

ANGLAIS 3 

ANGLAIS 4 

ANGLAIS 5 

ANGLAIS 6 

ANGLAIS 7 

ANIMATIX 

ARSENE LAPIN 

ASSDESASS 

ASTROCOUPLE 

ATLANTIS 

BEACH HEAD 

BIDUL 

BLITZ 

BUDGET FAMILIAL 

CA.O 

CARACTOR 2 

CARTE DE FRANCE 

CARTE DU CIEL 

CHALLENGE 

CHALLENGE VOILE 

CHATEAU DE LA MORT 

CHATEAU NOIR ET DRAGON 

CHOPLIFTER 

CHRISTANN 

COLISEUM 

COLORCALC 

COLORPAINT TO7f70 

CONTROLE AERIEN 

COQ'INN 

CROCKY II 

DEBUG 

DIEUX DU STADE 

DIEUX DU STADE 

DIEUX DU STADE T09 

ECHECS 3.7 M05 

ELIMINATOR 

EMPIRE 

EUROSPACE 

EXTRA MIS/USINE INFERN 

FBI 

FLIPPER II 

FOOTBALL 

FORTH 

FOX 

FULGUR 

GESTE DARTILLAC 

GESTE DARTILLAC T09 

GRAPHIOUES TO7f70 

GRAPHOLOGIE 

IL L'INTRUS 

IMPERIALIS 

JUDOKA 

KARATE 

KARATE 

KARATE T09 

LA MALEDICTION DE TAAR 

LAS VEGAS 

LAS VEGAS 

LAS VEGAS T09 

LASA 

LE MILLIONAIRE 

LORANN 

MANDRAGORE 

MANDRAGORE 

MANDRAGORE T09 

METE0 7 

MICRO SCRABBLE 

MICROSCILLO 

MINER 2049 

MINICAIC 

MINOTAURE 

MISSION DELTA 

MISSION PAS POSSIBLE 

MONITEUR ODIN 

NUMERO 10 

OCEANIA 

OMEGA PLANETE INVISIBLE 

OMEGA PLANETE INV. T09 

ORBITAL MISSION 

ORDINADOMI 

PILOT 

PINGO 

PLANETE INCONNUE 

POLYPHONIA TO7770 

POP POP 

POSEIDON 

PRAXITELE TO7f70 

PULSAR It 

RAID SUR TENERE 

REGATES 

RELANCE DISK TO7770 

ROGER ET PAULO 

RUNWAY 

SAN PABLO 

SCAR FINGER 

SCRIPTOR TO7770 

SOLEILNOtR 

SORTILEGES 

SPACE SHUTTLE 

STANLEY 

STATISTOUES T07m) 

STRESS 

SUPER JIMMIE 

SUPER TENNIS 

TABLO 5 M05 

THESAURUS 

THOMCALC 

THRESHOLD 

TOP CHRONO 

VOL SOLO 

VOX M05 

YETI 
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CIGARILLOS EXTRA-FINS 



AMSTRAD 

VENDS Amstrad CPC 464 mono, 
sous garantie, logiciels, livres, joys- 
tick : 3200F. Fabrics au (1 ) 47 95 01 
75. 1 

CHERCHE K7 The Battle Begins 
pour Amstrad CPC 464. Jean- 
Francois Hcefenlin 79 rue du Mare- 
chal Foch 68680 Kembs. Tel. (16) 89 
48 42 32 apres 13h30. 

VENDS CPC 464 couleur sous 
garantie, livres micro-Appl. N° 1 a 
5, 8 et 12, clefs pour 664 et prog, 
formation basic Amsoft pour 4500F. 
Vends aussi Datamat, Textomat, 
Microspread pour 700F. Serge au 

(16) 92 58 03 53. 

VENDS pour CPC 464/664 avec lec- 
teur de disquette, carte d'extension 
64K, marque Core Phoenix M64, 
avec cable de liaison, programme 
d'utilisation et documentation en 
Francais. Prix 500F. Philippe 
Arnaud 59 avenue des Marguerites 
93220 Gagny. Tel. (1) 43 32 82 1 1 . 

CHERCHE plan de modem univer- 
sel pour Amstrad. Echange contre 
nombreux logiciels. Frederic au (16) 

9 1 66 18 89. 

VENDS pour Amstrad, synthetiseur 
vocal 100% francais, 300F. Ellul au 

(16) 68 96 39 23. 

ECHANGE logiciels sur K7 pour 
Amstrad 464. Alexis Letournel, 27 
rue Kellogg, 92150 Suresnes. Tel. 

(1) 42 04 52 99. 

ECHANGE jeux pour Amstrad. Gil- 
les Menigot, 16 av. Malherbes, 
38100 Grenoble. Tel : (16)7625 62 

31. 

CHERCHE nombreux correspon- 
dants CPC 6128 pour echanges, 
bidouilles, sur disquette et K7. Cher 
che Compilateur Integral. Patrice 
Charrier, Bussieres et Pruns, 63260 
Aigueperse. Tel. (16) 73 63 72 58 
apres 19h30 ou le week-end. 



CHERCHE possesseurs d'Amstrad 
pour echanger des jeux sur K7 pour 
CPC 464. Philippe Vallet, 19 chemin 
de la Croix-Rouge, 74000 Seynod. 
Tel. (16)50 51 62 69. 

VENDS K7 Labyrinthe 3D pour CPC 

464 (jeu inedit). Envoyez cheque de 
30F, encaisse 1 5 jours apres envoi. 
David Valverde. 1 1 allee des Coque- 
licots, 78260 Acheres. 



ECHANGE logiciels pour Amstrad 
CPC 464. Olivier au (16) 26 64 14 
79 apres 17h. Cherche HHHHebdo 
No 116. 



ECHANGE programmes pour Ams- 
trad. Hercule Minus, 15 rue d'Arlon, 
6700 Arlon (Sesselich), Belgique. 

ECHANGE pres de 600 program- 
mes pour CPC 464 sur K7 et dis- 
quette. Cherche nouveautes. Vends 
originaux. Fabrice Schuller, 5 rue St. 
Bruno, 67200 Strasbourg. 



PERIGOURDAIN en mal de pro- 
grammes et possesseur d'Amstrad 
CPC 6128, cherche contacts pour 
echanger des programmes sur dis- 
quette. Jerome legendre, 17 rue 
Cyrano, 24100 Bergerac. 
(NDLJC : Vous avez vu ? II habile 
rue Cyrano a Bergerac, ca fail 
"Cyrano de Bergerac". C'est mar- 
rant hein ? '.. Mouais !) 



APPLE 

VENDS Apple II + 80cok>nnes, 16K 
RVB. Prix 3500F. a debattre. Tel. 
(16) 43 46 30 27 (heures bureaux). 



VENDS' Apple He, 2 drives, 128Ko, 
80 colonnes, carte couleur, joystick, 
imprimante Apple, nombreux pro- 
grammes et docs : 15000 F. Mon- 
sieur Maisonnier, le Bourg 69380 
Marcilly D'Azergues. Tel. (16) 78 43 
69 16. 



VENDS Apple lie, Duodisk, joystick. 
Chat Mauve, Moniteur, Nombreux 
programmes, livres. 10.000F Tel. 
(16) 75 25 08 16. 



VENDS Apple lie 84, duodisk 85, 
Moniteur Vert Apple, ventilateur, 
carte Z80 (CP/M), carte 80 colonnes 
64K, carte super serie, Joystick. 
Prix . 8500F. Marc au (1) 45 43 10 
28. 



VENDS Apple lie (achete le 
31/12/85), manette Apple, 190 logi- 
ciels (papyrus, Multiplan, Lisa V2.6, 
18 copieurs.) livre "Les ressources 
de I'Apple He" : 7000F. le tout. Tel. 
(1) 46 55 59 32 (a partir de 20h). 



VENDS Apple He (65C02), 2 lec- 
teurs, 80 colonnes 128K, moniteur 
vert Apple, joystick, nombreux pro- 
grammes (dont professionnels). 
Mars 84 peu servi. Le tout 8500F. 
Tel. (1) 43 87 99 81 (apres 18h30). 



VENDS Apple He 12/84 moniteur, 
souris, joystick, version Calc Apple- 
work, Epistole, Budget Familial, Sor- 
cellerie : 7800F. Tel. (16) 42 96 19 
96 



ATARI 

CHERCHE tout contact sur Atari 
520 ST, 520 STF et Atari 1040 STF : 
GEM, VDI, AES, BIOS, XBIOS, 
Hards, Softs... C. Leblond Tel. (16) 
47 67 77 67 (le soir apres 20h ou le 
week-end). 12 rue Montaigne 37300 
Joue-les -Tours. 

(NDLJC : Lui au moins, il en profile 
d'etre au club. Trois PA pour lui lout 
seul. Par contre celle-la j'ai rien 
compris. Ca veut dire quoi tous ces 
trucs-la ?) 



VENDS magnetophone 1010 pour 
Atari 800 XL ou 130XE et 6 jeux : 
450F. Tel. (16) 45 35 13 01 (heures 
bureau) + port. 



VENDS 20 cassettes Atari 2600 
(Zaxxon, Star Wars.) eclate 
2000F., gratuit console Atari 2600 et 
ses 3 paires de manettes Excellent 
etat. P. Theate Tel. (16) 82 22 42 90 
(entre 20h30 et 21h30). 
(NDLJC : La charmanle standar- 
dise d'abord c'est moi, et si tu veux 
m'avoir I'as qu'a appeler 
I'HHHHebdo pour des renseigne- 
ments sur le club. Tu crois quand 
m&me pas que j'vais t'filer mon 
num6ro perso ? Faut pas r&ver I) 



CHERCHE contacts pour 520 ST. 
Marc GIROUD 29 avenue des Peu- 
pliers 94350 Villiers sur-Marne Tel. 
(1) 43 04 18 08. 



VENDS pour console Atari les car- 
touches (avec notice) : Space Inva- 
der, Pit Fall, Defender, Asteroid, 
Cosmic Ark. Circus Atari, Carnival. 
Fire Fighter, Donkey Kong (sans 
notice), Pac Man (sans notice) : 65F. 
piece et la console 100F. (pour pie- 
ces detachees : "fonctionnement 
intermittent") Demander Francois 
au 39 85 66 62 (les mercredi, 
samedi et dimanche apres midi). 
(NDLJC : Alors comme j'sais pas si 
c'est en province ou a Paris, 
essayez par le 16 ou directement et 
vous verrez bien !) 



CANON 

VENDS Canon X07 16Ko Ram, 
imprimante table tracante 4 cou- 
leurs X710, jeu de 4 stylos, piles 
neuves, etuis de protection, cables 
et alimentations supplementaires, 
nombreux livres techniques, nom- 
breux logiciels varies, (neuf 4500F.) 
vendu 3000F. 

Memoires neuves 8Ko x8 Hitachi 
HM 6264 compatibles Toshiba TD 
5565 pour etendre la memoire du 
Canon a 16Ko : 300F. Piece. Pos 
sibilite de negocier. C. Leblond Tel. 
(16) 47 67 77 67 (le soir apres 20 
heures ou le week-end). 1 2 rue Mon- 
taigne 37300 Joue-les-Tours. 



COMMODORE 

ECHANGE programmes pour Com- 
modore 64, uniquement sur disk. 
Pierre Boutavent 7 rue de Verdun 
21 160 Couchey. Tel. (16) 80 52 22 
69. 



VENDS Commodore 128 D, 1571 
integre, sous garantie, moniteur 
couleur 1901, imprimante 803, 
magnetophone, joystick, livres, jeux, 
disquettes, valeur 14500F, vendu 
12000F, ou vente separee. M.Gar- 
dinal, 60 residence des Traunques, 
40200 Mimizan. 



OFFRE nombreux logiciels sur K7 
ou disquette ainsi que des livres sur 
le 64. Tel. (16) 53 97 31 19 le soir. 



ECHANGE tous programmes sur 
disquette pour C64. Alain Guyet, 74 
rue Pierre Brossolette, 85000 La 
Rochesur-Yon. Tel (16) 51 62 41 
82. 



CHERCHE commodoristes pour 
echange ou achat de logiciels sur 
Ke ou disquette Tel. (16) 30 95 35 
51 



CHERCHE correspondants pour 
echange de programmes sur K7 ou 
disquette pour CBM 64. So Dik, 9 
allee Le Vau, 77200 Lognes. Tel. (1) 
60 05 15 66 apres 17h. 

ECHANGE programmes pour CBM 
64 sur disquette pour 1541. 4011 
Cracking Service, 7 rue de St- 
Exupery 79100 Thouars. Tel. (16) 49 

66 64 39. 

ECHANGE programmes sur dis- 
quette ou K7 pour CBM 64. Alain 
Vatrinet, 22 rue Eugene-Bastien, 
54240 Joeuf. Tel. (16) 82 22 20 80 
apres 18h. 

ECHANGE logiciels pour CBM 64 
sur K7. Demander liste a Jean- Yves 
Peron, 48 boulevard Boisson 13004 
Marseille. Tel.(16) 91 49 24 63. 
Vends egalement adaptateur CGV : 
250F. 

VENDS Commodore 64, prise peri- 
tel, manette, plus de 40 jeux. Tres 
bon 6tat le tout 2000F. Demander 
David au (16) 33 57 07 46. (heures 
repas). 

VENDS Cbm 64, moniteur vert, lec- 
teur K7, joystick, enceintes, docs, 
100 logiciels de gestion, traitement 
de textes, musique, dessin, jeux. 
Valeur 13000F. sacrifie a 5000F. 
Possibilite vente sans moniteur : 
4200F. Tel. (1)42.22.58.47 
ECHANGE multitude de jeux (nou- 
veautes) et utilitaires pour Commo- 
dore 64 sur disk uniquement. 
Reponse assuree. Envoyez vos lis- 
tes a Ronan Le Pape 6 rue de la 
Ferme, Redoute, 97200 Fort-de. 
France, Martinique. (NDLJC : Alors 
lui il manque pas de toupet il envoie 
les deux memes annonces. Faut 
pas dteonner deja qu'on a du mal 
a les passer toutes. C'est pas 
parc'qu'il s'appelle Le Pape qu'on 
va tout lui cider, hein ?) 

EXELVISION 

CHERCHE correspondent ayant un 
EXL100. Voici liste des program- 
mes : Jack Pot, Salaire, Le Nombre 
mysterieux, Cube, Chaud et froid, 
Allumettes, Allumette a plusieurs, 
Calendrier, Rebond, Couloir aerien, 
Course de voiture, Cible, Anomalie, 
Combat spatial, Bataille navale, 
Golf, Solfege, Le Jeu du 21 , Pair- 
Impair, Devine un chiffre, Le Jeu du 
Whyttof, Jack-Pot, Le Jeu de la feve, 
Exelabyrinthe, le Jeu de I'oie, De 
truque, Echiquier, Mille-pattes, Ter- 
ritoire, Initiation a I'Exelbasic les 4 
volumes, Faites parler votre ExMOO 
les 2 volumes, Superlab, Creaphix, 
Mille-Pattes. II y a deux Jack-Pot et 
deux Mille-Pattes differents. 



ECHANGE logiciels pour EXEL 100. 
Tous les programmes Hebdogiciel, 
autres programmes divers. Tel. (16) 
35 86 80 58. 



ACHETE magnetophone compati- 
ble Oric. Cherche contacts pour 
echange de logiciels. Tel. (16) 74 58 
78 33. 

VENDS Atmos, lecteur de K7, 
cables, alimentations, nombreux 
programmes (100), nombreux lis- 
tings, nombreux plans d'extension, 
2000F a debattre. Patrice Meynle, 
27 rue du College, 67430 Biemerin- 
gen. Tel. (16) 88 00 41 16 le 
week-end. 



VENDS Oric Atmos, modulateur 
couleur, modulateur noir et blanc, 
jeux, livres, 750F. Tel. (1) 46 38 34 
84. 



VENDS Oric Atmos, magneto- 
phone, synthetiseur vocal, 75 pro- 
grammes, carte mere, cordons, 
revues, adaptateurs, 1600F le tout. 
Lionel Ciclet, Le Bossons, 74570 
Thorens. Tel. (16) 50 22 45 68. 



VENDS interface imprimante 
M05/T07 : 300F. J. P. Alix Tel. (16) 
35 83 68 72. 



THOMSON 



TO7/70, Basic, magneto, manettes, 
30 jeux et programmes, 16 cou- 
leurs, 3500F. Monsieur Landeau 
Tel. (16) 60 29 40 99 (apres 19h). 



Stop Affaire I Vends TO7/70 (achete 
fin 84), drive et contrdleur 320K, lec- 
teur de K7 TO7/70, 41 programmes 
sur K7, 100 programmes sur disk 
(les meilleurs), nombreuses revues 
et listings, (valeur neuve : 13.000F.) 
cede 7000F. Eric Balzer 65 rue Ana- 
tole France 57120 Rombas. Tel. (16) 
87 67 1 1 77. 



J'ai le bonheur de vous annoncer la 
vente d'un T07, magneto, ext. 16K, 
avec comme logiciels : Politique 
Economique, Tridi 444, Echo et un 
coktail de 11 jeux. Manuel basic, 
Micro Game, Basic Dos, pour un 
prix de 2500F. Ecricre a Deleuzenne 
Regis 26 cite Henri-Beghin 59239 
Thumeries. 



VENDS T07 70, moniteur vert, lec- 
teur de disquettes 320K, LEP, 
manettes et contrdleur, Basic, 
assembleur (cartouche), jeux, bou- 
quins sur le T07, 8000F a debattre. 
Tel. (16) 53 54 07 42 le soir. 

VENDS coffret Thomson M05 com- 
plet, clavier mecanique, Mandra- 
gore, Pictor, crayon optique, sous 
garantie, achete en 86, interface 
jeux joystick norme Atari, 2 joysticks 
aux normes Atari/Thomson, 3 logi- 
ciels (Animatix, Cartoon Maker, 
Pilot), 10 bouquins sur le M05, le 
tout en etat neuf, valeur 5200F, 
vendu 3200F. Michel Soulier, 129 
rue Rolland, Bat. B, 13008 
Marseille. 

VENDS 19 K7 originales pour M05. 
Tel. (16) 44 76 77 63. 
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HECTOR 

VENDS cassettes jeux, utilitaires, 
etc. pour hector 16K, 48K, 64K. Prix 
unitaire de 20 a 50F. Tel. (1) 42 63 
50 93. 



VENDS Hector 2 HR + 48K, tres 
bon etat (mars 85) avec 30 K7 de 
jeux et utilitaires, livres, dictionnaire 
des basic Hector, 2 joystick. Vendus 
2300F. Le tout (a debattre). VENDS 
egalement imprimante Seikosha 
GP500 A avec papier et accessoi- 
res (6 mois) Vendu 2000F a debat- 
tre. Tel. (1)30 92 61 02. 

ORIC 

VENDS Oric Atmos, 250 logiciels, 
livres, manuel, magneto, 2500F. 
Tel. (16) 60 68 46 43 (apres 18h30). 

VENDS Atmos peritel, cordons, 220 
programmes, 1200F. Jean -Luc 
Arsac, 1 1 rue Mozart, 26500 Bourg- 
Les-Valence. Tel. (16) 75 56 45 31 
(/ENDS lecteur de disquettes 3", 
DOS, livre, tres bon etat, 1500F 
Erick Aguirre, route Dous Bos, 
64600 Anglet Tel. (16) 59 52 40 12 
apres 18h. 

CHERCHE possesseur Atmos dans 
la region de Vannes-Morbihan pour 
echange de programmes Discoric 
ou K7. M.Fabregue, 18 place de La 
Republique, Vannes. Tel. (16) 99 42 
71 09. 



VENDS T07 70, Basic, lecteur de 
K7, manettes, 3 K7 de jeu (Fox, 5em 
Axe, Karate), livres (Basic et assem- 
bleur), de nombreux jeux sur K7, 
4500F le tout, etat neuf. David 
Guyonnet, Le Breuil, La Chapel le 
Taillefert, 23000 Gueret. Tel. (16) 55 
52 58 46 aux heures de repas. 

ECHANGE nombreux programmes 
pour M05. Jean-Marie au (16) 54 76 
29 26. 

VENDS TO7 en bon etat, entiere- 
ment revise, cartouche Basic, exten- 
sion memoire 16K, valeur 4600F, 
vendu 2000F, 2 livres, 3 K7 pleines 
de programmmes. Sebastien Pier- 
ran, lotissement St Charles, 54120 
Baccarat. Tel. (16) 83 75 20 01 
apres 18h. 



SPECTRUM 

VENDS Spectrum " + ", 48K, inter- 
face peritel, 16 logiciels, sous garan- 
tie, 1500F. Emmanuel Mekint, 18 
avenue Henri.Renard, 91670 Anger- 
ville. Tel (1) 64 95 22 24 apres 18h. 
ECHANGE nombreux programmes 
pour ZX Spectrum 48 Ko. Alain Cap- 
marty, (16) 61 80 17 06. 

VENDS ZX Spectrum " + ", 48K, 
interface peritel, cables, 2 livres, lec- 
teur de K7, interface Kempston joys- 
ticks, entree cartouche ROM, joys- 
tick, 21 logiciels, 2000F Nathalie au 
(1) 42 05 11 11. 



VENDS ZX Spectrum " + ", 48K, 
avec adaptateur peritel, interface 
joystick, magnetophone, nombreux 
logiciels. Benoit au (16) 51 93 15 42. 
CHERCHE contact sur Dijon pour 
echanges de logiciels pour Spec- 
trum 48K. Xavier au (16) 80 71 19 
75 du lundi au vendredi. 

ECHANGE nombreux programmes 
pour Spectrum. Charles Lattes, 32 
avenue de I'Observatoire, 75014 
Paris. Tel. (1) 43 35 43 80. 

AFFAIRE ! Echange K7 des der- 
niers originaux disponibles sur le 
marche tels que : Fist, Commando, 
Vox, Critical Mass...). Thierry Vial- 
lard, 100 rue Constant Coquelin, 
94400 Vitry sur Seine. Tel : (1 ) 46 80 

23 06. 

ECHANGE nombreux programmes 
pour Spectrum (Eureka, Zorro, 
Saboteur, Fairlight...). Raphael Le 
Douce, TY Lipic, 29000 Plomelin. 
Tel : (16)98 94 23 41. 

VENDS pour Spectrum, logiciels ori- 
ginaux Spectrum 48K : Knight Lore, 
Night Shade, Underwurlde, Doom- 
dark Revenge, Frankies gees to 
Hollywood, Hobbit, Inter Cobalt, 
Never Ending Story, Shadow Of 
Unicorn, Sorcery, Super Chess 3.5 
etc. Philippe Dode Bat F8, n° 671, 
Allee des Pins-Soie-Vauban 60000 
Beauvais. 

CHERCHE logiciels sur K7 pour 
Spectrum 48 Ko. Didier Montoya 
Hameau de Palau, Sainte-Leocadie, 
66800 Saillagouse. Tel. (16) 68 04 

73 96. 

VENDS Spectrum plus avec inter- 
face I, Interface II, joystick, deux 
micro drives ainsi que 40 micro- 
cartouches avec programmes (80). 
Avec surprise : prix au plus offrant 
possibilite de separer les ensem- 
bles. Jose Manuel Teixenia 20 rue 
St-Sebastien 7501 1 Paris. 



TI99 

VENDS Ti 99/4a, extension Basic, 
4 modules, cordon K7, manettes, 
interface peritel, 7 99 Magazine et 
leur K7 de jeu, programmes (200), 
1200F. Rosan au (1) 69 05 41 00. 
VENDS toutes sortes de choses 
pour Ti 99/4a aux prix de la Regie 
a Calcul divises par 2 ou 3. 
Ph.Jacono, 17 avenue Auguste 
Renoir, 06800 Cagnes sur-Mer. Tel. 
(16) 93 20 60 58. 

VENDS Ti 99/4a, Basic etendu, 
joysticks, manuels, 750F, bottier 
d'extension peripherique, contro- 
leur. unite de disquettes, program- 
mes sur disquette, 2250F. T61. (16) 

49 69 55 76. 

VENDS pour Ti 99/4a, Basic etendu, 
manuel en francais, 4 logiciels en 
BE, K7 avec jeux en BE, listings, 
500F. Patrick au (16) 27 46 57 54. 
VENDS Ti 99/4a, 16K, extension 
memoire 32K, module Basic etendu, 
module Ti Logo, manettes de jeu, 
documentations, 1600F. Tel. (1) 64 

27 31 36 apres 19h. 

VENDS Ti 99/4a, adaptateur peritel, 
livres, 600F. Tel. (16) 74 97 22 25 

le soir. 

ACHETE pour TI99/4A carte(s) P- 
Code, collection complete et en bon 
etat, 99 magazine (n°1 a 100), Mul- 
tiplan Microsoft, Ti-Calc, Scrabble, 
Tests de Biologie 1 et 2, de Physi- 
que (d'lvan Berg), Mini-Memoire 
(urgent pour I'ensemble). Echange- 
rait aussi volontiers programmes uti- 
litaires en assembleur. Christian 
Kielec 98 03 58 07 apres 19h. 

VENDS Ti99/4A, adaptateur 
Pal/Secam, magnetophone avec 
cordon de liaison, basic etendu avec 
notice en francais, module de jeu 
Munch Man, cassettes de jeux, 
manettes de jeux et mode d'emploi 
en francais. le tout en parfait etat 
2000F. Tel. (16) 78 26 20 67. 



ZX81 

VENDS ZX80 ameliore 81, 16 Ko, 
imprimante, bouquins : 900F a 
debattre. Eric Huynh, 56 rue des 
Chasses 921 10 Clichy. Tel. (1) 42 70 
65 10. 



DIVERS 

VENDS collection complete de 
I'HHHHebdo et de Micro-Systemes, 
bon etat. A Couchot, 1 1 rue des 
Roseaux, 67400 lllkirch-Graffensta- 
den. Tel. (16)88 67 14 21. 
(NDLJC : Bonjour le nom de la ville ! 
J 'vous dis pas le lemps qu'jai mis 
a l'6crire. Vous comprenez mainte- 
nant pourquoi taut attendre un mois 
pour que votre PA passe ? 
VENDS Casio FP 200 portable, cor- 
don K7, adaptateur secteur (8 lignes 
x 20 colonnes), livres, 2000F. Rosan 
au (1)69 05 41 00 



VENDS console Soundic noir et 
blanc, 5 cartouches : Course Auto, 
Bateau, Sous marin, Desctruction 
(quilles ou murs), Moto (saut ou 
course) et Sports (tir, foot, tennis, 
hockey.) 28 jeux en tout. Sur sec- 
teur (je donne un tranfo.) ou sur 
piles : 700F. Francois au 39 85 66 
62. (les mercredi, samedi, et diman- 
che apres midi. 

VENDS Lazer 3000 compatible 
Apple II, lecteur disk, joystick, 100 
programmes de jeux, emulateur et 
Dos, FP Basic, peritel. Le tout 
3500F. Tel. (16) 60 75 02 50. 

Echange nombreux logiciels (jeux et 
utilitaires) contre logiciels, interfa- 
ces, joysticks, souris, lecteur de dis- 
quettes, etc. Thierry Garreau 11 
rue des Arts 44400 Reze. Tel. (16) 

40 75 52 19 

CHERCHE super mec qui m'echan- 
gerait mon moniteur monochrome 
contre un couleur. Pierre au (16) 21 
28 29 22 

RECHERCHE utilitaires-copie autc- 
matiques, pour dossiers compiles 
(passage de K7 vers disquette). 
Demander Domy au (16) 40 05 06 
86 

VENDS Sanyo PHC 28S MSX, 
extension 64 KO, lecteur de disquet- 
tes (360Ko) avec interface, 1 joys- 
tick yano, 2 hyppojoyst, 2 cartou- 
ches de jeux, 2 cassettes, livres : 
4700F. Tel. (1) 48 52 79 47 (apres 
18h). 

CHERCHE DMP 2000 d'occasion 
encore sous garantie si possible et 
le moins cher possible. Ecrire a 
Yves Renard 9 rue SampieroOorso 
47300 Pujols (priere de ne pas 
telephoner). 

VENDS imprimante Philips 80 
colonnes MSX, 2000F a debattre. 
Jamais servi, pour incompatibilite 
(NDUC : ...d'humeur !). Boutevin L. 
30 rue Elie-Raymal 15100 St Flour. 

Tel. (16) 71 60 02 56. 

VENDS livres TILT n° 1 et 5, Micro 
VO n° 1 , 2 et 3, 1'Ordinateur Indivi- 
duel n° 68 et 70, SVM n° 16 et 21 
et la revue de I'utilisateur de I'lbm 
PC n° 13 ou les echange contre 
logiciels Amstrad. Cherche corres- 
pondant pour echange de logiciels 
Amstrad (K7) dans la region pari- 
sienne. Tel. (1) 42 55 55 40. deman- 
der Thierry. 

VENDS Sinclair QL, moniteur 
ambre HRG Zenith, cables, cable 
interface, convertisseur serie/paral- 
lele pour imprimante type Centro- 
nics, nombreux logiciels sur micro- 
disquettes (dont assembleurs, Ian- 
gages, logiciels graphiques et pro- 
fessionnels. jeux...). livres techni- 
ques, (neuf 7000F.) vendu 4500F. 
Ensemble 8300F (au lieu de 
17000F.) : moitie moins cher !. C. 
Leblond 12 rue Montaigne 37300 
Joue-les-Tours. Tel. (16) 47 67 77 
67 (le soir apres 20 heures ou le 

week-end). 

VENDS orgue electronique K7 616 
Bontempi, 2 claviers, 3 octaves par 
clavier, 10 instruments, 6 rythmes, 
touches Memory, Single Finger 
Chods, Automatic, Sustain, Arpegio, 
Vibrato. Rythme tempo, rythme 
volume, Master volume, Balance, 2 
haut parleurs : 3000F. Tel : (1)43 
30 16 66. 

(NDLJC : J'suis sur que c'est un 
cadeau du Pare Noel qu'il revend 
la !). 
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INCROYABLE ! 

MEME LES JAPONAIS 
N'EN REVIENNENT PAS 



SONY HIT-BIT 

- CLAVIER AZERTY. 

- 3 LOGICIELS INTEGRES : 

- ADRESSE (carnet d'adresses). 
- PLANNING (agenda). 

- MEMO (bloc note pouvant etre utilise comme 
"Mini Traitement de Textes"). 

- NOTICES EN FRANCAIS. 
- FOURNI AVEC CABLE MAGNETO. 




BON DE COMMANDE A ENVOYER A S.E.H. 160 rue Legendre 75017 Paris. 

SONY HIT-BIT 950 F. □ PRIX SPECIAL CLUB HEBDOGICIEL 750 F. D 

N° CARTE 

NOM : PRENOM : 

ADRESSE : 

CODE POSTAL :. . '. '. '. VILLE :....... 

Participation aux frais de port 30 F. Materiel Garanti t an pieces et main d'ceuvre. 



Reglement par : 



cheque D 



CCP □ 



Mandat D 



DEUX SUPER-CONCOURS PERMAMENTS 

20.000 francs de prix au MEILLEUR LOGICIEL du MOIS et un VOYAGE pour 2 per- 
sonnes en CALIFORNIE au meilleur logiciel du TRIMESTRE. 



Un concours de plus I 
Rien de bien original dans cette 
formule, pourtant nous essayons 
de faire quelque chose de diffe- 
rent : nous organisons un con- 
cours permanent tous les mois et 
tous les trimestres I Et avec des 
prix dignes des programmes que 
vous allez nous envoyer I 
De plus, ce seront les lecteurs 
eux-memes qui voteront pour 
leurs programmes preferes sur la 
grille recapitulative mensuelle. 
Pas de jury, pas de decision arbi- 
trage. HEBDOGICIEL n'interve- 
nant que dans le choix des pro- 
grammes qui devront etre ORIGI- 
NAUX et FRANQAIS. Si votre pro- 
gramme n'est pas tout a fait au 
point, un de nos specialistes vous 
dira comment lameliorer pour 
nous le proposer a nouveau. 
Pour participer, il vous suffit de 
nous envoyer vos programmes 
accompagnes du bon de partici- 
pation ainsi que de toutes les 
explications necessaires a I " utili- 
sation de ce programme. 
Bonne chance ! 



Reglement : 

ART.1 : HEBDOGICIEL organise de 
facon mensuelle et trimestrielle un 
concours dote de prix recompen- 
sant le meilleur programme du mois 
et du trimestre. 

ART. 2 : Ce concours est ouvert a 
tout auteur de logiciel quel que soit 
le materiel sur lequel il est realise. 
L'envoi d'un logiciel en cassette ou 
disquette accompagne d'un bon de 
participation decoupe dans HEB- 
DOGICIEL constitue I'acte de 
candidature. 

ART.3 : La redaction d'HEBDOGI- 
CIEL se reserve le droit de selec- 
tionner sur la base de la qualite et 
de I'originalite les logiciels qui sont 
publics dans le journal. 
ART.4 : Ce sont les lecteurs qui, par 
leur vote, determinent les meilleurs 
logiciels mensuels et trimestriels 
ART. 5 : Le prix alloue pour le con- 
cours mensuel sera remis au plus 
tard un mois apres la cloture du con- 
cours mensuel. 

ART.6 : Le prix alloue pour le con- 
cours trimestriel sera remis au plus 
tard un mois apres la cl6ture du con- 



BON DE PARTICIPATION 



cours trimestriel. 

ART.7 : Le present reglement a ete 
depose chez Maitre Jaunatre, 1 rue 
des Halles, 75001 Paris. 
ART. 8 : HEBDOGICIEL se reserve 
le droit d'interrompre a tout moment 
le present concours en avisant les 
lecteurs un mois avant. 
ART.9 : La participation au con- 
cours entraine I'acceptation par les 
concurrents du present reglement. 



HEBDOGICIEL : 
75017 PARIS. 



24 rue Baron 




Nom : 

Prenom : 

Age Profession : 

Adresse : 

N c ' telephone : 

Nom du programme : 

Nom du materiel utilise : 

declare etre lauteur de ce programme qui nest ni une imitation ni une 
copie dun programme existant Ce piogramme reste ma propriete et 
j'autorise HEBDOGICIEL a le publier. La remuneration pour les pages 
publiees sera de 1000 francs par page (un programme n occupant pas 
une page entiere sera remunere au prorata de la surface occupee) 

Signature obligatoire : 

(signature des parents pour les mineurs). 

Le programme doit etre expedie sur support magnetique (cassette ou 
disquette) accompagne dun descri p tit detaille du materiel utilise, 
dune notice d'utilisation d u prog ramm e. Les supports des program- 
mes publies sont conserves , noubliez done pas den faire une copie. 



Sera declare gagnant le pro- 
gramme qui aura obtenu le plus 
fort pourcentage de vote par rap- 
port a la totalite des programmes 
recus pour un meme ordinateur. 

Ainsi, pas de favoritisme pour les 
ordinateurs plus puissants ou tres 
diffuses. 

qjOOQO &*&• 

'wee <*,&> w&tf\ 

AW-fl* Vfl/f? 900 foi$ 

wis oe lp> iw 
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Vous detestez votre libraire ? Bravo ! Salut la Promo est faite pour 
vous. Chaque semaine les plus malins d'entre vous pourront pro- 
filer d'une offre speciale mais aussi nous commander tous les 
albums de bandes dessinees de ieur choix. En plus, chaque 
album donnera droit a un point-cadeau, plusieurs points-cadeaux 
donnant droit a un album de bandes dessinees gratos (3 points 
pour "les robinsons du rail" de Franquin, 5 points pour "Kama- 
sutra" de Jacovitti, et 8 points pour "Pin-Up, toutes les pinups 
du siecle"). Comment commander ? Tres simple, sur la liste des 
albums publiees chaque semaine, prenez les prix, ajoutez 10 
francs de port si vous n'en commandez qu'un ou 6 francs par 
album s'il y en a plusieurs, et renvoyez-nous le coupon-reponse 
avec votre paiement. Attention, a partir de 4 albums, le port est 
gratuit et a partir de 240 francs vous recevrez gratos le mensuel 
"Spot BD" 

Salut les nouveaux. 

Bon, remarquez d'abord quelque chose : le texte qui serf 
d'en-tete a cette rubrique a change. Tout est explique dedans, 
le coup des albums gratos, tout. C est une idee de moi, voyez- 
vous. Je me suis dlt : "Felix, plutot que repeter sans cesse 
la meme chose, fais des photocopa". Et je I'ai fait. Done, 
regardez ci-dessus, vous saurez tout. 
Sauf la promo speciale de la semaine, qui consiste cette 
semaine en je sals pas quoi, etant donne que j'ai paume mes 
papiers. Attendez. Bon, je retrouve pas. Je me rappelle que 
ca concerne vaguement "Joe's air force" de Pepe Moreno 
et "Le theoreme de Bell" de Schultheiss, mais je sais plus 
ce que j'offre avec. Ca fait rien, j'improvise sans filet : je vous 
offre (mais pour une semaine seulement) Spot BD, qu est un 
mensuel sympa de bd, pour I'achat du Moreno ou du Schulh- 
theihssh. Voila. J'espere que ca va pas me miner. Bon, a la 
semaine prochaine. 



D Oui, je, oh oui, je. Bref, envoyez-moi le Pepe Moreno. 

D Oui, bref. Schultheiss. 

D Albums liste ci-contre vite points-cadeaux. 

D Catalogue grat. 




L HOMME A LA VALISE 45,00 

CLARKE ET KUBRICK 1 39,50 

CLARKE ET KUBRICK 2 39,50 

CLARKE ET KUBRICK 3 39,50 
LES HARPES DE GREENMORE 100,00 

AVANT GUERRE 39,00 

LA FEMME DU MAGICIEN 72,00 

KRAKEN 69,00 

LA COMETE DE CARTHAGE 42,00 

TRAGIQUES DESTINS 49,00 

BLOODI ET LES RONGEURS 32,00 

CONTES PERVERS 59,00 

LE RIGE 56,00 
MAESTER ET BOULES DE 

GOMME 45,00 

MORBUS GRAVIS 59,50 
PAS DE DEO GRATIAS POUR 

ROCK MASTARD 65,00 

L'HORLOGER DE LA COMETE 33,00 

REBEL - PEPE MORENO 1 45,00 

ZEPPELIN • PEPE MORENO 2 45,00 
JOE'S AIR FORCE - PEPE 

MORENO 3 52,00 
LE PRIVE D HOLLYWOOD - 

BERTHET 1 33,00 

MORTES SAISONS-BERTHET2 33,00 

COULEUR CAFE - BERTHET 3 33,00 

LE THEOREME DE BELL 49,00 

LES CINQ EPREUVES 36,00 

LES CHEVALIERS DE L'ENFER 33,00 

L'ANGE CARNIVORE 70,00 

KARGA. LE SEPTIEME UNIVERS 46,00 

WEIMAR 59,50 



Nom : Code postal + Ville : 

P'6non\: Envoyez ce bon a : IMPRESSION 3 impasse du 

Adresse : Colombier 95230 SOISY 

131 
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EBDITO 

Encore ! Ce petit salaud de 
Fabrice Broche m'a encore atta- 
que dans son cours d'assembleur 
de merde. Pardonnez ma grossie- 
rete, mais je suis tout herisse. Ce 
petit con avec son Oric de merde 
s'imagine faire la loi dans cet illus- 
tre journal ? C'est rate, mon petit 
(a partir de la, je m'adresse a lui 
directement, prenez surtout pas pa 
pour vous, chers lecteurs), t'es un 



ignoble chancre mou pulverulent 
et goitreux. Ton cours est faux 
d'un bout a I'autre (c'est vexant, 
hein ?) et d'ailleurs, je n'adresse 
plus la parole a quelqu'un qui 
n'est pas capable de gerer une 
pile. 

Bon, labd, euh... Ben ca va, merci 
pour elle. 

Milou. 



SO Pa 


rade! 




L'HOMME A LA VALISE 


GOOSSENS 


18 


LA FEMME DU MAGICIEN 


BOUCQ/CHARYN 


17 


TRAGIQUES DESTINS 


VUILLEMIN 


17 


ZEPPELIN 


PEPE MORENO 


17 


CLARKE ET KUBRICK 3 


FONT 


17 


CLARKE ET KUBRICK 2 


FONT 


17 


PAS DE DEO QRATIAS... 


BOUCQ/DELAN 


17 


MORBUS GRAVIS 


SERPIERI 


17 


LE THEOREME DE BELL 


SCHULTHEISS 


17 


MAESTER ET BOULES DE 






GOMME 


MAESTER 


17 


MORTES SAISONS 


BERTHET/ANDREAS 


17 


MEMOIRE DES ECUMES 


CAZA/LEJALE 


17 


JOE'S AIR FORCE 


PEPE MORENO 


17 




CHOMAGE 




Cauvin, vire. T'es alle trop loin dans 
la nullite. Mazel, de cote, pa te plait 
visiblement pas de faire cette serie 
a la con, on te garde sous le coude 
pour quand t'auras cree quelque 
chose de plus personnel et de 
mieux. J'ai dit. 



IfSJUNOUSPBRDUBS 

xcemR 







LES CHEVALIERS DE L ENFCR de 
MAZEL el CAUVIN chez DUPUIS, 
33 licenclements (avec lettre 
recommandee avec accuse de 
reception). 



SAUCE 

AU 
POIVRE 



<D 



Apres Franquin, Greg, Godard, 
Dany et d'autres, c'est Walli et Bom 
qui s'y collent pour dessiner les 
aventures de Modeste et Pompom. 
Ca reste pour les momes, c'est tout 
mignon et attendrissant, mais c'est 
pas a coups d'attendrissements 
qu'on fait la bd du siecle. Ca plaira 



MODESTE-P0MP0N2 




^'*^' 
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aux eternels petits neveux (il est 
interessant que 80% du chiffre 
d'affaires des editeurs de bd est rea- 
lise par des petits neveux. Je serais 
editeur, je ferais ma pub en conse- 
quence : "un nouvel album pour les 
neveux !"). 

AH I CA RIRA, CA RIRA de WALLI 
et BOM chez LOMBARD, 25 filets, 
vachement bon marchi, bravo. 



HERITAGE 




Je sais pas pourquoi, a chaque fois 
que je vois arriver un album de 
Schultheiss, j'entame des danses 
incantatoires qui me menent jusqu'a 
I'aube. J'egorge des poulets, je 
sacrifie des vierges (ca devient dur, 
d'ailleurs), je trace des pentacles et 
j'invoque toutes les puissances que 
je connais (c'est-a-dire douze, on ne 
m'a pas presente les autres). 
Parce que c'est a chaque fois meil- 
leur. Schultheiss, c'est deja un tres 
grand dessinateur, le genre qu'on 
aimerait ranger sur I'etagere a cote 
d'Herge et de Mcebius mais qu'on 
peut pas, parce que quand meme, 
vous avez vu les horreurs qu'il 
dessine ? 

Seul probleme de I'album : c'est un 
premier tome. Ca veut dire qu'il y en 
aura d'autres, ce qui est une bonne 
chose, et qu'on n'a pas la fin dans 
celui-la, ce qui est moins bien, parce 
qu'on est tres rapidement accro a 
son personnage. 

Je vais pas deblaterer deux heures, 
c'est absolument genial, fabuleux, 
beau, interessant, nouveau, plein 



SCHULfjIEISS 


HmEOr3SH 




DE BELL 


j 




v 
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d'adjectifs valorisants. Vouala. 

LE THEOREME DE BELL de 
SCHULTHEISS chez ALBIN 
MICHEL, 49 seringues. 



PAS 

D'ACCORD 




Je m'insurge violemment contre le 
precede qui consiste a annoncer en 
premiere page que I'auteur est mort 
et qu'il etait extremement gentil 



KdRGd 
LE7UHIMERS 




quand il etait vivant. Comment 
voulez-vous dire que le dessin est 
nul, apres ca ? Parce qu'on vous 
repond automatiquement : "out, 
mais tu sais, s'il avait pu conti- 
nuer..." Oui, mais voila, il a pas con- 
tinue, il est mort avant. Done, 
n'extrapolons pas, cet album est 
tres ledj ((a veut dire leger, je vais 
I'utiliser souvent, rappelez-vous) sur 
le plan du dessin. En plus, le sce- 
nario est de Vernes, et je vous 
raconte pas, ou plutdt si, tiens, je 
vais vous raconter. Je vais vous 
retranscrire le dialogue de la pre- 
miere page. 

"Avancez, charognes, vous allez au 
bagne, celui du septieme univers, 
on n'en revient jamais, ah ! ah ! 
ah I... 

- S'ils croient que je vais m'enfour- 
ner la-dedans I Avec mes ermines 
trafiquees, je pourrai jouer mon va- 
tout. Et plus de Karga ! 

- Grouille-toi, gibier de potence, ou 
je te reduis en charpie I 

- Si je t'en laisse le temps, maudit ! 
(C'est le moment !) 

- Arrete ou j'te grille, charogne ! 

- Tu peux me griller ! Je prefere pa 
au septieme univers I" 

Fin de la page un. 
Alors ? 

KARGA, LE SEPTIEME UNIVERS 
de VERNES et BEAUTEMPS chez 
LOMBARD, 46 cliches. 



EVOLUTION 




Au debut, on croirait presque qu'on 
est dans un Nasdine Hodjah, mais 
on s'apercoit rapidement qu'on est 
dans un tonneau de merde, ce qui 
n'est pas la meme chose, vous en 
conviendrez sans doute. Grugef est 
un dessinateur de fumetti, les peti- 
tes revues genre Zembla et Akim- 
Color. Ca se sent. Le dessin est nul- 
los au possible, le scenar ininteres- 
sant, allez hop, fin de I'article. 

TETE DE CUIVRE de GRUGEF 
chez KESSELRING, 69poubelies. 




AILLEURS 




Another world, another time, comme 
disait la voix au debut de Dark 
Crystal. C'est vrai que ca ressem- 
ble, en plus fou et en plus sanglant 
puisque c'est en bandes dessinees. 
Ca autorise plus de choses que le 
cinema, et a un cout moindre. Jodo- 
rowski, visiblement, est dans son 
element : il navigue entre differents 
dieux, entre races et peuples avec 
une aisance qu'on comprend mal, 
parce qu'il faut un bon moment pour 
s'habituer aux personnages. Une 
fois qu'on comprend qui est qui, qui 
est avec qui et qui veut tuer qui, pa 
va mieux. Ca devient mSme tres 
bien. Par exemple, savez-vous com- 
ment ces gens font I'amour ? lis ont 
des petites mains qui sortent de la 
poitrine, au moins quatre ou cinq. 
Au bout de chacun des doigts, il y 
a une petite tete qui aboie. Les deux 
personnages se collent I'un contre 
i'autre, et les petites tetes de I'un et 
de I'autre se mordent, et ils font 
I'amour comme pa. Moi je dis : 
bonnard. 



LANGE 
CARNIVORE 




Le dessin est fou. Carrement. Trois 
seins, des bees, des cretes, des 
bras de douze metres, Cadelo a 
construit un monde entier dans 
lequel une chatte aurait du mal a 
retrouver ses petits. 
Tout est bien, done. 

L ANGE CARNIVORE de CADELO 
et JODOROWSKI chez LES 
HUMANOS, 70 bras. 



THE 

INTEGRAL 

FOOT 




Le pied. Genial Olivier, c'est le pied. 
C'est tenement bSte, vous pouvez 
pas savoir Et le meilleur, c'est que 
plus pa va et plus c'est bete ! A cha- 
que album, on se dit pa y est, il a 
attaint le fond, il n'ira pas plus bas. 
Et il va plus bas. On se dit qu'il ne 
peut que s'ameliorer, ne serait-ce 
qu'un petit peu, mais macache : le 
pauvre Devos reste semblable a lui- 
meme Je vais me faire un plaisir de 
vous raconter la premiere histoire de 
I'album. 

Genial Olivier, en discutant avec son 
pere, decouvre que celui-ci reve 
d'un Noel sous la neige avec un 
sapin. Aussitdt, paf, il invente un 
appareil qui fait neiger et un autre 
qui fait pousser des sapins. Allez, je 



COMBAT 



Pepe Moreno, c'est la grosse artil- 
lerie, la bd sans complexes. Dans 
un delire de couleurs excentriques. 




un aviateur americain flingue un 
aviateur allemand en 1943 sur 48 
pages. J'ai jamais vu autant d'enu- 
cleations (je vous dirais bien d'aller 
voir votre dico, mais je suis pas sur 
que pa existe : pa veut dire "arra- 
chage d'yeux") dans un seul album. 
A chaque fois qu'un avion en des- 
cend un autre, c'est le pilote qui 
prend la rafale dans la tete. Moreno 
a de droles de phantasmes, je 
trouve. Ceci dit, c'est rejouissant au 
possible (je dis pa pour que mes 
futurs biographes puissent dire : "il 
eprouvait une certaine fascination 
pour la mort violente", alors que 
c'est meme pas vrai) (quoique) 
(bref). 

Bon, disons que c'est une rafale de 
mitraillette dans la bd, et n'en par- 
Ions plus. 

JOES AIR FORCE de PEPE 
MORENO chez ALBIN MICHEL, 52 
avlona. 




Vous avez deja regarde ce qu'il y a 
sur la 5, vous ? Moi oui. Je suis 
consciencieux, figurez-vous. On 
m'amene une nouvelle chatne sur 
un plateau, je la regarde. 



Plkcasseurs 




Et j'ai done eu droit principalement 
a "c'est beau la vie", avec I'inenar- 
rable Gilot-Petre, toujours aussi con, 
et a "Flamingo road", mais la j'ai 
regarde que le debut, j'ai craque au 
bout de dix minutes, faut pas me 
prendre pour un con, quand meme. 
Et puis j'ai vu aussi les polars de 
serie Z qu'ils diffusent a longueur de 
temps. Et je me suis aperpu avec 
stupeur que e'etait bien nul, dans le 
style. 

Et, abandonnant la 5, j'ai com- 
mence a lire "Les Casseurs". Et je 
me suis arrete tout de suite parce 
que retrouver sous forme d'album 
les conneries de la 5, y a des abus 
a pas commettre. C'est pareil : y a 
meme la pub pour les bagnoles 
entre I'histoire. J'ai done change de 
chatne pour aller retrouver 
Schultheiss. 



UN SUPER FLIC (et moi, jesuls les 
chlnola) de DEN A YER et DUCHA- 
TEAU chez LOMBARD, 35 
tffiuisr- en/ollveura. 




1925, en Allemagne. Un detective 
prive est confronte a une serie de 
mysteres qu'il va resoudre a la fin 
du bouquin, parce que c'est pas un 
Glenat, sinon on aurait eu droit a 
une suite. Ce qui est interessant, 
c'est I' etude de I' Allemagne de cette 



epoque; ce qui est inquietant, c'est 
que e'etait a peu pres comme la 
France de maintenant : des grou- 
puscules d'extrdme droite qui com- 
mencent a poindre, et le reste de la 
population qui se dit que faut pas 



tuetm 



vous raconte la deuxieme. 
Genial Olivier ne veut plus travail- 
ler a I'ecole parce qu'il en a marre 
(c'est pas tres bien explique) Aus- 
sitdt, il invente un double de lui- 
meme qui va faire le boulot a sa 
place. 

JACQUES UEVOS 

M Rectitude et Genial Olivier© 

El eclront , molecule % et pemums 




Les prochaines aventures : Genial 
Olivier a envie de pisser. II invente 
un rallongeur de bite, ou un rapprc- 
cheur de chiottes. Genial Olivier a 
froid. II invente le chaud. Genial Oli- 
vier s'aperpoit qu'il est con. II 
invente le suicide. 

ELECTRONS, MOLECULES ET 
PENSUMS de DEVOS chez 
DUPUIS, 33 inventions nullardea. 




deconner, des gens comme pa 
n'auront jamais une parcelle de 
pouvoir. 

Le dessin, impossible a decrire. 
C'est italien, je crois, ou espagnol. 
Quand pa ressemble ni a du Giraud 
ni a du Herge, je suis bien embete 
Les qualificatifs me manquent. Bon, 
disons que c'est personnel. Le sce- 
nar est manicheen, certes, mais 
bon, c'est ce qui est le plus facile 
a lire, c'est reposant. Le tout forme 
un polar situe en 1925, enveloppe 
dans un contexte historique, et 
merde, on va pas y passer la nuit. 

WEIMAR de DAL PRA at TORTI 
chez DARGAUD, 59,50 nazlllons. 



SALUT LA 
P ROMO 

VOIR PAGE 21 



22 
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EDITO 



Toujours a I'affut de bons tuyaux, n'est-ce pas ? Alors 
notez que le magasin de disques "FACE B", rue de 
Lappe, Paris 11°, est un glorieux casseur de prix , 
essentiellement sur le marche de I'import. Le fou tres 
sympatique qui se saigne de sa marge beneficiaire 
pour le bonheur de sa clientele propose son vinyle a 
des prix inferieurs a ceux de la FNAC, et arfiche ses 
Compact discs a moins de 100F ! S'il vous plait I On 
se calme, arbore un air detache et Ton dit "Merci 
monsieur" en penetrant dans la boutique... 
BEN 



MICRO... 
SILLONS 

ROLLING 
STONES 

Dirty Works (CBS) 

Ah bon I vous I'avez deja achete, cedant 
comme tout un chacun a la seduction du 
bulldozer promo qui ne peut manquer 






d'accompagner la sortie d'un album des 
Cailloux, surtout quand c'est leur premier 
chez CBS. Et vous vous etes deja apercu 
a quel point las chasseurs de scoop vous 
ont bourre le mou en vous gonflant "I'eve- 
nement" jusqu'a I'enflure, vous presentant 
la chose comme "I'estraorrrdinaiaire 
retour des Stones vers leurs racines ...bla- 



blabla" . Avouez franchement qu'il n'y avait 
pas de quoi ecrire a la famille. C'est juste 
un autre album des Stones apres dix ans 
de routine, avec un Jagger glapissant, un 
Keith Richards omnipresent, un Charlie 
Watts metronomique et au moins un mor- 
ceau qui n'est qu'une demo faite en une 
seule prise. En regardant de pres la 
pochette, on lit que Bobby Womack, Tom 
Waits, Jimmy Page et d'autres ont parti- 
cipe a ce disque. Ben, j'vais t'dire, ils les 
ont bien planques, parce que pour enten- 




dre autre chose que la gratte boueuse de 
Richards et les aboiements de Mick, doit 
falloir faire un stage chez Sonotone. Enfin 
voila, ce disque va se vendre et c'est un 
peu tristoune, quand on sait que les Sto- 
nes n'ont vraiment plus rien a raconter, 
alors que tant d'autres groupes ont un tas 
de trues a dire. Sale boulot ..tu I'as dit ! 



MORY 
KANTE 



'10 Cola Nut*' (Barclay) 

En voila un beau disque ! 

Et quelle serenite que cede qui 

emane de la voix du griot 

Mandingue, dont les doigts 

agiles courent sur les cordes 

de la cora ! II s'en echappe 

une vision du monde aussi ronde 

que la calbasse qui fait resonner la musi- 

que, a I'image de la coupole du ciel. Plu- 

tflt que de parler pour ne rien dire ou de 

se taire, le griot chante. Et cette fois, le 



s**! 








griot a trouve a qui parler en musique. 
Mory Kante a rencontre David Sancious, 
qui sut si bien faire parler la guitare acous- 
tique aux cotes de Stanley Clarke et faire 
parler ses propres reves a travers les cla- 



*0* 



oe" 




BLABLA... 

LUTHER 
ALLISON 

Cheveux crepus deja grisonnants, corps 
d'athlete, regard percant et sourire ecla- 
tant, Luther Allison, guitariste energique 
et inspire, I'un des seuls a transmettre 
encore en paroles le feeling du Blues 
ancestral, n'a aujourd'hui qu'un regret : ne 
pas avoir ete reconnu a sa juste valeur. 

Concours de circonstances (il fut I'un des 
seuls bluesmen a faire partie de I'ecurie 
Motown), refus de faire des concessions 
au grand marche niveleur du disque ame- 
ricain (ecceure par I'attitude des mar- 
chands de musique U.S., il decidait de 
s'expatrier en France pout y trouver 



"Encore !" un manager qui s'occupe vrai- 
ment de lui), on retrouve tout au long de 
la carriere de Luther Allison cette droiture 
qui ne s'accorde pas toujours avec le suc- 
ces mediatique et populaire. Ce n'est pour- 
tant pas I'estime des stars qui lui a man- 
que : B.B. King, Mick Jagger, Clapton, 
Dylan ont tous vante ses qualites artisti- 
ques, ce qui n 'etait que justice. Pourtant, 
meme si revocation du passe a parfois 
pour Luther un gout amer, il a toujours su 
garder une attitude de battant, faisant evo- 
luer sa musique jusqu'a lui donner une 
emprunte totalement personnelle. II en (era 
la demonstration au cours de trois soirees 
parisiennes au Cirque d'Hiver, du 21 au 
23 avril. Et se sera I'occasion pour nom- 
bre d'entre nous de saluer en Luther Alli- 



son I'un des grands heritiers de la tradi- 
tion Blues-Rock-Rythm & Blues. 
LUTHER ALLISON : "Depuis de nom- 
breuses annees, j'ai toujours essaye de 
faire part aux gens de ce que je suis exac- 
tement. Par tradition je suis un bluesman. 




J'ai vecu le Blues et j'en suis tier. Tant de 
musiciens de Rock viennent du Blues. 
Mais aujourd'hui, j'ai I'impression que Ton 
commence a reconnaitre Luther Allison 
non plus a travers le Blues - en Europe, 
on m'a connu au depart par "The Thrill is 
Gone", repris a ma maniere de B.B.King, 
le musicien que je respecte au-dessus de 
tous, et aussi grace a "Sweet Home Chi- 
cago" -, mais a travers un style qui m'est 
personnel. Et cela me fait du bien. Parce 
que pour un bluesman, c'est toujours la 




meme histoire depuis des annees : on ne 
peut pas enregistrer avec une grande com- 
pagnie de disques, on est oblige de comp- 
ter seulement sur le peu de gens qui s'inte- 
ressent a vous, mais qui ne peuvent pas 
vous offrir tout ce dont vous avez besoin . " 



H&- 



**£5gg& 




HHHH : "Depuis quelques annees, 
I'Europe semble bien vous avoir adopte..." 
L.A. : "C'est vrai. On m'a dit qu'en Suisse, 
par exemple, on me placait actuellement 
au-dessus d'Eric Clapton. C'est un nou- 
veau pas de franchi pour moi. Je mets 
I'accent sur la Suisse, parce que ma pre- 
miere apparition en Europe a eu lieu au 
Festival de Montreux, oil je me suis pro- 
duit regulierement par la suite. D'autre 
part, nous venons de donner des concerts 
en Allemagne, dans des clubs et des gran- 



des salles. Notre passage au Rock Palast 
a ete tres apprecie. Nous avons joue en 
Hollands, en Autriche et nous devons aller 
en Scandinavie, en Italie et pour la pre- 
miere fois en Grece. Nous sommes sta- 
tement en pourparlers pour une tournee en 
URSS et un nouveau passage au Japon, 
oil nous etions I'annee derniere." 
HHHH : "Mais votre musique ne se limite- 
t-elle pas a un certain public ?" 
L.A. : "Pas du tout, elle peut satisfaire les 
amateurs de Jazz, de Soul, de Gospel, de 
Rock'n'roll... Mais principalement, ce que 
j'essaye de faire a present, lorsque j'ecris 
mes chansons, c'est de penser a un public 
jeune. Ma musique doit le concerner plu- 
tot que de le ramener en arriere. C'est 
pourquoi mon nouveau disque s'intitule 
"Here I Come". II n'y a aucune raison de 
retourner vers le passe. A mes debuts, 
e'etait I'epoque des Nat King Cote, Chuck 
Berry, Fats Domino, Bill Halley et ainsi de 
suite... Je suis originaire de I' Arkansas, 
puis j'ai grandi a Chicago parmi les plus 
grands du Blues, du Rock, du Jazz, mais 



lorsque je suis venu en Europe, j'ai dit a 
tout le monde : 'Please I Ne me collez pas 
I' etiquette Chicago Blues I Je n'en ai pas 
besoin. Je suis moi-meme." II y a la tradi- 
tion et ce que nous vivons aujourd'hui. Je 
sais comment vivre ma tradition. Mais 
quand je joue, c'est du 'Luther Blues'. 
Souvent on me demande pourquoi j'ai des 
musiciens francais, des musiciens blancs. 
Et c'est vrai que depuis des annees les 
artistes, blancs comme noirs, ont conserve 
ces barrieres de couleur. Mais pour moi, 
il n'y a jamais eu la moindre barriers 
raciale et il ne devrait pas y en avoir en 
musique. Je suis done fier de dire que sur 
mes deux derniers albums j'ai trois musi- 
ciens francais qui sont pleinement respon- 
sables de la qualite de la musique. Mal- 
gre les annees, je dois toujours lutter pour 
prouver la valeur de notre musique. Et 
c'est tout ce que nous avons a faire. Mais 
je suis pret a defier n'importe quel groupe 
de Rock sur trois heures de show !" 
HHHH : "Vous serez pour trois soirs au 
Cirque d'Hiver. A quoi peut-on 
s'attendre ?" 

L.A. : "A un show live et puissant, com- 
pose des chansons de mes deux derniers 
albums, 'Life is a Bitch' et 'Here I Come', 
e'est-a-dire mon propre repertoire. II faut 
bien retenir ceci : 'Luther Allison is here 
to stay' I" 



viers en un disque merveilleux, "The 
Bridge". Avec quelque chose comme de 
I'humilite, David Sancious s'est fait le tra- 
ducteur pour I'oreille occidentale des 
chants et rythmes du griot, sans jamais 
deflorer leur valeur profonde. L'osmose est 
la, chaque instrument, chaque son, cha- 
que modulation a sa place, faisant de ce 
disque une ceuvre d'art. Ce n'etait, apres 
tout, qu'une question de feeling... 

JOE 
COCKER 

Cocker (Capltol/Pathe Marconi) 

Avec le vteux Cocker, on a au moins la sur- 
prise a chaque fois, meme si sa voix reste 
essentieftement la mime. Son parcours 
est une telle succession de dents de scie I 
Souvenez-vous de "Sheffield Steel", sorti 
chez Island en 82, un disque sobre et defi- 
nitif. Et bien, il nous revient chez Capitol 




avec un disque bourre de pompes orches- 
trates dignes de la Streisand I Et figurez- 
vous que ce look tout cuivres, tout chosurs, 
tout synthes ne lui va pas si mal au tim- 
bre - il a un timbre si unique I Quand on 
s'apercoit que les morceaux ont ete enre- 
gistres entre Londres, Antigua, Hollywood 
et New York, qu'apparaissent les noms de 



producteurs reputes aussi differents que 
Bob Ezrin et Bernard Edwards, qu'il inter- 
prets aussi bien Randy Newman ("You 
Can Leave Your Hat on") que Marvin Gaye 
("Inner City Blues"), on ne peut pas nier 
au bonhomme cette farouche person nalite 
qui lui permet de donner a ce disque une 
reelle unite. A partir de la, on aime ou on 
n'aime pas. Personnellement j'avoue avoir 
un faible pour cette faculte qu'a Joe Coc- 
ker d'adapter sa voix cassee au rythme 
lent des ballades. Laissez-vous guider. 



L'AFFAIRE 
LOUISTRIO 



Ce Sotr 45 t. (Barclay) 

Je peux vous dire sans me tromper qu'on 
va entendre parler de ces lascards.1) 
Parce que leur musique est super au point 
ET ORIGINAL : un savant melange pop de 
cha-cha, de rumba, de couleurs jazzy et 
funky. 2) Parce qu'ils sont doues 







d'HUMOUR, fait fort rare parmi les jeunes 
groupes francais. 3) Parce qu'ils se sont 
invents un look irresistible, qui est JUSTE 
un look : il suffit de voir I'incroyable Louis 
Trio (alias Cleet Boris) se desosser le corps 
en scene comme personne d'autre, pour 
realiser que ces mecs ont tout compris. 
L' Affaire Louis'Trio, une affaire que vous 
ne pourrez pas vous contenter de suivre 
betement devant votre tele. Une juteuse 
affaire signee "Rock'Envol". 



INFOS TOUT POIL 

* Le dixieme Pnntemps de Bourges semble avoir attaint les object* que c'etaient fixes les organtsateurs. 
En progression de 30% par rapport a I'annee passee. la mkx»rtfltxxi des sallesadepasi* en S6 LES 120.000 
entrees payantes, un nombre important de concerts affdiantaxnr^. On rernaro/iera on revanche qu'en d^ 
nant une manifestation monstre (avec le souten de TF1 en plus de cstui d'Europe 1), le Printemps 86 s'est 
laisse alter J diverses mjthodes contraignantes qu'on ne lui avait jamais connues : recrudescence * barrieres 
de police avec multiples chicanes a bestiaux (Meeeee ! devenant le cri de du festrvaiier), fouiHes irrtempestrves, 
condoles renlorces. etc Etait-ce bien necessaire ? Consequence ou simple reflet de cet etat de fait, le public 
pogoteur des Porte Mentaux destroyait energiquement les six rxmiers rangs de fauteuits (taHait pas Stre malin 
pour lasser les sieges aussi I) et les Cramps tentaient de prouver qu'ils etaient un vrai groupe de Rock en 
ptssant dans les couloirs, chiant dans les chambres et saccageant le mobilier de leur hotel. Anecdotique mon 
cher Watson 

* Le nouveau poulam de la maison Barclay est un certain Bashung, dont le prochain album est attenduavec 
hysterie. 

* Furieuse, Catherine Ringer de Rita Mitsuko intente un proces au distnbuteur vereux qui proftte de son actuei 
succes pour ressortir les deux tiims pornos dans lesquels elle avait joue quand elle Mart dans la deche Tous 
des salauds j'vous drs I 
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L 'HERITIER 



Heritier (veinard !) du richissime John Mac Nammy, une 
clause vicieuse du testament vous oblige a denicher dans 
le malefique chateau du decede I'arbre genealogique de 
votre famille. Courage, un million de livres est en jeu... 



e&r entomb 




SUITE DU 
N°130 



3445 DRAW7,-7,0:DRAW15, 1, 1:DRAW10 
,-2,0:DRAW10,0,l 

3450 CURSET80, 135, 1 :DRAW90, 0, 0:DR 
AWO, 1 5, 0:DRAW-90, 0,0: DRAWO, -15,0 

3455 F0RI=1T07 

3460 CURSET90+I, 157, 1:DRAW0, 10, 1 

3465 CURSET153+I, 157, 1: DRAWO i 10, 1 
:NEXT 

3500 PRINT"Vous etes dans un cham 
bre. . . * 

3510 INPUT"Que faites-vous "iAA* 

3520 IFAA*=R*THEN3100 

3525 IFAA*=T*THENZAP:G0T036OO 

3530 G0SUB19000:G0T03500 

3600 REM SOUS TERRE 

3610 HIRES: INK3 

3613 (20430 

3615 CURSET10, 160, 1 :Ff)RT = lT035 : RE 
ADX,Y:DRAWX,Y,l:NEXT 

3620 CURSET110,40, 1:DRAW10,20, 1:D 
RAW3.20, 1 

3630 CURSET220.60, l:DRAW-;0,20,l 

3635 IFXZO1THEN16000 

3640 PRINT'vous declenchez un mec 
anismetvous vousretrouve2 dans une 

grot te. " 

3650 INPUT-Que f ai tes-vous" ; AA* 

3655 IFAA»=R*THEN3400 

3660 IFAA*=G*THEN15800 

3665 IFAA»=D*THEN3700 

3670 G0SUB19000:G0T03650 

3700 REM MORT 

3705 IFEE*=M*ANDL=1THEN3800 

3706 G0SUB3710:GOT03750 
3710 HIRES! INK4 

3713 120470 

3715 CURSET 140, 100, 1 :F0RI=1T033: R 



Sylvain GAUTHIER 



EADX , Y : DRAWX , Y , 1 : NEXT 

3720 CURSET153,50,1:F0RI=1T016:RE 
ADX,Y: DRAWX, Y,1:NEXT 

3725 CURSET120, 103, 1 IDRAW-8, 12, 1 : 
DRAW2.4, l:DRAWB,-14, 1 

3730 CURSET.140,70, 1 :DRAW-5, -16, 1: 
DRAW-3,2,0:DRAW2, 16, 1:DRAW-B,4, 1 

3735 DRAW-8,-8, 1 :DRAW1,-10, 1:DRAW 
6,-3, 1:DRAW6,2, 1 

3740 CURSET 1 22 , 60 , 1 : CURSET 1 2B , 60 , 
1 

3745 RETURN 

3750 PRINT-Le faucheur de la vie 
vous empeche de passer..." 

3755 INPUT-Que faites-vous "SEE* 

3760 IFEE*=R*THEN3600 

3765 IFEE*=M*ANDL=1THENPRINT"I1 1 

'accepte et s'en va ":WAIT150:GO 

T03800 

3770 IFEE*=A*THEN15900 

3780 GOSUB19OOO:GOTO3750 

3800 REM TRAPPE PLAFOND 

3810 HIRES=INK4: 120510 

3815 CURSET90,20, l:FILL40, 1,3 

3820 CURSET165.20, 1 :FILL40, 1,4 

3825 FORI=1T020:CURSET100+I/2,30+ 
I, 1:DRAW60-I,0, 1:NEXT 

3830 CURSET160,31, 1 :F0RI=1T09: REA 
DX, Y: DRAWX, Y,l INEXT 

3835 CURSET239, 165, 1 :F0RI=1T018: R 
EADX,Y:DRAWX,Y, 1:NEXT 

3840 CURSET80, 120, 1 :DRAW10,-30, 1 I 
DRAW80,0,0:DRAW10,30, 1 :DRAWO, 10, 1 

3845 CURSET70.43, HDRAW20, 16, 1 : DR 
AWB0,0,0:DRAW10,-13, 1 

3B50 PRINT" II y a une ouverture a 
u plafond. Le mur d'en face s'effri 
te. " 

3855 INPUT'Que faites vous ";AAt 

3860 IFAA*=U*ANDFG*=AJ*THEN3BB0 

3865 IFAA*=V*ANDXY=1THEN3890 

3870 IFAA*=R*THEN3600 

3875 GOSUB19000:GOT03850 

3880 PRINT"Vous lancez la corde e 
t vous montez. . . " : WAIT 100 :G0T03900 

3890 TEXT:PRINT"0K! ... II y a un p 
assage derriere vous 1 * empruntez. . 



3895 PRINT"En chemin vous trouvez 
une clef. . . " :WY=1 

3896 PRINT'Vous vous retrouvez da 
ns une salle du chateau..." 

3B97 WAIT500:GOT05300 
3900 REM FIN 

3902 TEXT:PAPER1 : INKO 

3905 HIRESlPAPERl: INKO 

3906 CURSET6C60, UFILL35, 1,3 
3910 CURSET95, 180,1 :FILL10, 1,23 
3920 CURSET100, 106, HFILL72, 1,23 
3922 CURSET130, 106, l:FILL72, 1, 17 
3950 CURSET95,95,1:FILL10,1,23 

3955 CURSET135,95,l:FILL95, 1, 17 

3956 CURSETO, 191, 1:FILL2, 1,23 
3960 F0RI=102T0130STEPB 

3965 CURSETI, 177, 1 :DRAW0,-63, 1 :DR 
AW1,-1, lrDRAWl, 1, 1:DRAUI0,63, 1 :NEXT 

3970 F0RI=1T07 

3975 CURSET100,88, 1 :CIRCLEI,1 

3980 CURSET126.B8, 1:CIRCLEI, 1:NEX 
T 

3985 F0RI=1T014 

3990 CURSET 100, 80+1, 1:DRAW26,0, 1: 
NEXT 

3995 DRAW3.-5, 1 : DRAW- IB, 0, 0: DRAW3 
,-3, l:DRAW10,0,0 

4000 CURSET100.80, 1 :DRAW5 , 2, :DRA 
W3,3,0:DRAWO,5,0:DRAW-3,3,0:DRAW-5 
,2,0 

4010 CURSETIOO.BB, 1 : CIRCLES , 0: CI R 
CLE2,0 

4030 PRINT:PRINT"Ap P uyez sur une 
touche":GETTG* 

4040 TEXT:PAPER0:INK1 

4060 PRINT:PRINTCHR*< 138) ;"B R A 
V O" 

4070 PRINTCHR*(138) !"B R A V 0" 

4080 PRINT: PRINT: PRINT: PRINT" Vous 

avez enfin trouve le parchemin" :S 
Y=l 

4090 PRINT'qui contient I'arbre g 
enealogique de votre famille..." 

4100 PRINT:PRINT"Les 10 000 000 d 
e. livres sterling sont" 

4110 PRINT'presque a vous:" 

4120 PRINT"Vous devez etre chez 1 



e notaire avant nidi... " 
4200 INPUT-Que faites-vous ";AA* 
4210 IFAA*=R*0RAA*=E*THEN3B00 
4220 GOSUB19000:CLS:GOT04040 
4900 END 

5000 REM 6eme PIECE 
5010 HIRES: INKS 

5015 CURSET20, 155, 1 : IFBB*=AG*THEN 
FILL20, 1.0ELSEFILL20, 1,6 

5016 120100 

5020 CURSET239, 150, 1 :F0RI=1T022: R 
EADX,Y:DRAWX,Y, 1:NEXT 

5025 CURSET130, 160, 1 :F0RI=1T08: RE 
ADX,Y:DRAWX,Y, 1:NEXT 

5030 IFBB*=AG*THEN5070 

5040 INPUT" II y a un pied de bich 
e par terre.Que faites-vous " ;BB* 

5045 IFBB»=AG»THEN5065 

5050 IFBB*=R*THEN700 

5055 IFBB*=G*THEN5100 

5060 G0SUB19000:G0T05040 

5065 PRINT'OK..." 

5070 PRINT: INPUT-Que faites vous 
"iAA* 

5075 IFAA*=R*THEN700 

5080 IFAA*=G*THEN5100 

5085 G0SUB19000:G0T05070 

5100 REM COULOIR 

5110 HI RES: PAPERS: INKO 

5115 CURSETO, O, 1:FILL30, 1, 16 

5120 CURSET10, 160, 1:DRAW229,0, 1 

5125 CURSET75.40, 1 :FILL10, 1, 16 

5130 CURSET90.50, 1 :FILL35, 1, 17:FI 
LL5, 1, 16:FILL35, 1, 17:FILL5, 1, 16:FI 
LL30, 1, 17 

5135 CURSET170.40, 1 :FILL10, 1,21 

5140 CURSET150.50, 1 :FILLU0, 1,21 

5150 CURSETBO, 160, 1 : DRAWO, -1 12, 1 : 
DRAW80,0, 1 : DRAWO, 112, 1 

5155 F0RI=90T0150STEP10 

5160 CURSETI, 50, 1 :DRAW0, 110, 1 INEX 



Suite page 30 



Gt£fO<-B', j£ f>B*)( KiEH I*"?, 



AMSTRAD 



Suite de la page 8 



3380 FOR i = 1 TO 12 
3330 SOUND 1 ,100,2 
4000 a*=UPPER*<INKEY*> 
4.010 IF a*="\" AND xm<40 AND TESTC 
xm*16+10,406-ym*1S><>1 AND TESTCxm 
»1S+13,401-<ym-1 >«1E><>1 THEN LOCA 
TE xm,ym-1 :PRINT " ";:L0CATE xm,ym 
: PR I NT" "; :xm=xmt1 :n0=n0*2 :n1 =202 
4020 IF a*='V" AND xm>1 AND TEST<( 
xm-1 >»16-6,406-ym*1E>< >1 AND TEST( 
(xm-1 >*16-3,401-<ym-1>*1E)< >1 THEN 

LOCATE xm,ym-1 :PRINT " "::L0CATE 
KM i ym: PRINT" ";:xm=xm-1:nO=nO+2:n1 
= 208 

4030 IF a*="A" AND ym>2 AND TEST(x 
m«16-6,406-<ym-2>«16>< >1 THEN LOCA 
TE xm,ym-1 :PRINT " ";:L0CATE xm,ym 
IPRINT" "; :ym=ym-1 :nO=0:n1=21E 
4040 IF a*="Z" AND ym<22 AND TEST( 
xm«16-6,406-<ynn-1 >»16X>1 THEN LOC 
ATE xm,yni-1 :PRINT " ";:L0CATE xm,y 
m: PRINT" "; :y«=yin 1 :n0=0:n1=212 
4050 IF n0=4 THEN n0=0 
40&0 LOCATE xm, ym- 1 :PRINT CHR*<n1t 
nO);:LOCATE xm,ym:PRINT CHR*(n1tnO 
+ 1 ) ; 

4070 NEXT i 

4080 FOR m=336 TO 272 STEP -4:S0UN 
D 1 ,m,5, <m-2G8)/8 ( , ,20:NEXT m 
4030 LOCATE xb,yb:PRINT" "; 
4100 IF xm<xb+3 AND xm>xb-3 AND ym 
<yb*6 AND ym>yb-2 THEN 4120 
4110 score=score*100:G0T0 3180 
4120 LOCATE xm,ym:PRINT" ";:L0CATE 

xm , ym- 1 : F'RINT" "; 
4130 CLSS1 iPRINTIH , "Dechiquete par 

une bombe...0ue c'est triste! ! 
! " 

4140 GOTO 4870 



4150 REM 

41E0 IF TEST<xm«16-19,401-<ym-2>»1 

E)=3 THEN xp=-1 ELSE xp=1 

4170 LOCATE xm, ym- 1 : PRINT CHR*(21E 

>;:L0CATE xm,ym:PRINT CHR*(217); 

4180 LOCATE xm , ym-2 : PRINT CHR*<213 

);:L0CATE xm ,ym-3 iPRINT CHR*(212); 

:L0CATE xmtxp , ym-2 : PRINT" ";:L0CAT 

E xmtxp, ym-3:F'RINT " "; 

4130 FOR i=1 TO 30 

4200 IF INKEY*=" " THEN FOR m=300 

TO 280 STEP -4:S0UND 1 , m, 5 , (m-276 ) 

/4,,,1:NEXT m:L0CATE xm , ym-2 :PRINT 

" ";:L0CATE xm ,ym-3 : PRINT " ";:G0 
TO 3180 
42-10 NEXT i 
4220 LOCATE xm, ym : PRINT" ";:L0CATE 

xm,ym-1 r F'RINT" "; 
4230 GOTO 2480 

4240 REM . 

4250 REM PRESENTATION 4 

42&0 REM 

4270 MODE 2 

4280 INK 0,1:B0RDER 1 

4230 LOCATE 34,4:PRINT "TABLEAU N. 

4300 LOCATE 3, 7: PRINT "Vous etes p 
arveny a vendre vos diamante." 
4310 LOCATE 1,8: PRINT "Vous avez m 
aintenant assez d'ar-gent pious vous 

enfuir par I es airs ..." 
4320 LOCATE 1,3:PRINT "Vous entrer 

done dans un aeroport ou vous att- 
end un avion . " 

4330 LOCATE 3,11:PRINT "Dernier Ob 
stacle: une r-angee de tueur." 
4340 LOCATE 3,12:PRINT "Vous pouve 
z seu lenient avancer ou reculer et 
vous dever bien sur eviter les 

ba I I es . Sachez tout de meme que I 
e tueur qui s'apprete a tirer chan 
ge de couleur auparavant." 
4350 LOCATE 1,1S:PRINT "La vicoire 

est au fond de I ' aeroport .Mais pa 
rviendrez vous a I 'avion ?..." 
43G0 LOCATE 10,22:PRINT "Tapez une 

touche pour continuer" 
4370 FOR d=1 TO 30 :d*=INKEY* :NEXT 
d 

4380 IF INKEY*="" THEN 4380 
4330 tab I =3 

4400 REM 

4410 REM TABLEAU N.3 

4420 REM 

4430 MODE 1 

4440 INK 0,13:B0RDER 13:INK 2,0:IN 

K 1 ,13 

4450 PLOT 573,70,2:DRAW 580,170:DR 



AW 581 ,70 

4460 PLOT 573, 100: DRAW 560,135:DRA 

W 568, 280: DRAW 580, 330: DRAW 532,28 

0:DRAW 600,135:DRAW 581,100 

4470 PLOT 568, 280: DRAW 532,280:PL0 

T 572, 300: DRAW 588,300 

4480 PLOT 560, 170: DRAW 525,1 55 :DRA 

U 5E6,255:PL0T 600,170:DRAW £35,15 

5: DRAW 534,255 

4430 PLOT 580,220:DRAW 580,240:PL0 

T 576, 288: DRAW 576 ,232 : PLOT 584,28 

8: DRAW 584,292 

4500 FOR i=5 TO 24 STEP 3 

4510 LOCATE i,5:PRINT CHR*(212);:L 

OCATE i,6:PRINT CHR*<213); 

4520 NEXT i 

4530 LOCATE 1,11:PRINT CHR*<202);: 

LOCATE 1,12:PRINT CHR*(203); 

4540 LOCATE 28,11:PRINT STRING*<7, 

CHR*< 143) > ; :L0CATE 28,12:PRINT STR 

ING*(7,CHR$<143) ) ; 

4550 xm=1 :n1=202:tir 1=17 

4560 a*=UPPER*(INKEYt) 

4570 IF at="\" AND xm=34 THEN 4710 

4580 IF a*="\" AND xm<34 THEN LOCA 

TE xm,11:PRINT " ";:L0CATE xm,12:P 

RINT" "; : xm=xmt 1 : nO=nO+2: n1 =202 

4530 IF a*="/" AND xm>1 THEN LOCAT 

E xm,11:PRINT " ";:L0CATE xm,12:PR 

INT" " ; :xm=xm-1 :n0=n0t2 : n 1=208 

4600 IF n0=4 THEN n0==0 

4-610 LOCATE xm,11:PRINT CHR*(n1tnO 

);:L0CATE xm,12:PRINT CHR*(n1tn0t1 

) ; 

4620 nti=ntit1 

4630 IF nt.i=2 THEN nti=0:G0T0 4560 

4640 FOR m=300 TO 230 STEP -4:S0UN 

D 1 ,l»,5, <m-276)/4, , ,1:NEXT u 

4650 IF tir1 = x»l THEN 4830 

4660 FOR b=8 TO 17 STEP 2: LOCATE t 

ir1,b:PRINT CHR*( 144 ) ; :F0R i=1 TO 

15:NEXT i:L0CATE tir1,b:PRINT " "; 

:NEXT b:L0CATE tirl , b : PRINT " "jxL 

OCATE tir1,5:PRINT CHR*<21 2) lLOCAT 

E tir1,6:PRINT CHR*<213) 

4E70 tir1=INT(RND<1 )#7)«3+5 

4680 PEN 2:L0CATE tir1,5:PRINT CHR 

*<212) :L0CATE tirl ,E iPRINT CHR*(21 

3):PEN t 

4E30 GOTO 45E0 

4700 END 

4710 LOCATE xm,11:PRINT" " i: L0CATE 

xm,12:PRINT" "; 
4720 SOUND 1 , 200 , 1 0, 7: SOUND 1,300, 
10, 7: SOUND 1 ,400, 10 , 7 : SOUND 1,200, 
10,7 

4730 LOCATE 5,12:PRINT "FELICITATI 
ONS ! ! ! " 




4740 LOCATE 5,14:PRINT "Vous avez 

gagne " 

4750 WINDOW »1 ,30,40, 1 ,25 

47E0 FOR i=5 TO 35:IF i/2=INT(i/2) 

THEN PRINTI11 ,CHR*(10) :F0R c=1 TO 
30: NEXT c 

4770 SOUND 1 , 200 ,20 , i/5 , , , 10: NEXT 
i 
4780 FOR i=5 TO 20: IF i/2=INT(i/2) 

THEN PRINTB1 ,CHR*(10) :F0R c-1 TO 
30:NEXT c 

4730 SOUND 1 , 200 , 20 , 7 , , , 1 0: NEXT i 
4800 score=score*3000 
4810 GOTO 43E0 

4820 FOR i=5 TO 35:PRINT81 ,CHR* ( 10 
>:F0R c=1 TO 30:NEXT c:S0UND 1,200 
,20, i/5,, ,10:NEXT i:F0R i=5 TO. 20: 
SOUND 1 ,200,20,7, ,,10: NEXT i 
4830 FOR b=8 TO 12:L0CATE tir1,b:P 
RINT CHR*<144) ; :F0R i=1 TO 15:NEXT 

i:L0CATE tir1,b:PRINT " "jlNEXT'b 

4840 REM 

4850 REM FIN DE PARTIE 

48E0 REM 

4870 xv1 = xm:xv2=xm :yv1 =ym :yv2=ym 

4880 INK 2,0: BORDER 

4830 WINDOW tt2 , xv1 , xv2, yv1 , yv2:PAP 

ER»2,-2:CLSfl2 

4300 IF xv1>1 THEN xv1=xv1-1 

4310 IF xv2<40 THEN Xv2=xv2t1 

4320 IF yv1>1 THEN yv1=yv1-1 

4330 IF yv2<2E THEN yv2=yv2t1 

4340 IF xv1=1 AND xv2=40 AND yv1=1 

AND yv2=22 THEN WINDOW B2,xv1,xv2 
,yv1 ,yv2:PAPERB2,2:CLSa2:G0T0 4360 
4S50 FOR k=1 TO 20:NEXT k:GOT0 483 


4360 FOR k=1 TO 500:NEXT k 
4370 MODE 1: BORDER 12 
4380 INK 2,8:PEN 2 

4330 LOCATE 13,6:PRINT STRING*<16, 
"*") 

5000 LOCATE 13,14:PRINT STRING*<16 
,"*") 

5010 FOR i=7 TO 13:L0CATE 13,i:PRI 
NT "*";:L0CATE 28,i:PRINT "«";:NEX 
T i 

5020 PEN 1:L0CATE 15,3:PRINT "TABL 
EAU :";tabl 

5030 LOCATE 15,11:PRINT "SCORE :"; 
score 

5040 LOCATE 8,20:PRINT "Voulez-vou 
s rejouer ? (0/N)" 
5050 a*=UPPER*< INKEY*) 
5060 IF a*="0" THEN RUN ELSE IF a* 
< >"N" THEN 5050 
5070 CLS:END 
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Vivez dangeureusement en atfrontant au volant d'un bolide 
de course, les multiples dangers de circuits particulierement 

infames... 

Alain FOUSSE 



CANON X07 
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SUITE DU 

N°130 



371 QS=H1» 

372 1FRF< .BTHEN9S=H2S 

373 IFRF<.6THENS»»CHR»(I37I 

374 IFRF< .4THENSS-CHRSU38) 

375 IFRF<.2THEN8»»CHR»(159> 

376 SC-SC+1S*IT+1)*LENI8»>+10*V 

377 RETURN 

379 REM Generation de position de debri 
■ a droit* 

380 X3-9+INTIRNDIl)*10) : IFX3>170RX3<9THE 
N380 

381 Y3-0 

382 RETURN 

384 REM Generation de position de debri 
s a gauche 

385 X3«2+INTIRND(1)*10>' : IFX3< 10RX3> 10THE 
N38S 

386 Y3"0 

387 RETURN 

389 REM Verification dee positions 

390 IFLEN<aS)=lTHENREIURN 

391 K2=SCREENIX3+1,Y3+1) : IFK2=1330RK2= 13 
4THENG0SUB220 

392 RE1URN 

399 REM Deplacement en virage gauche 

400 M3=X3:N3=Y3: IFN3<3THEN402ELSEG0SUB38 
5 

401 G0SUB360:G0SUB370:L0CATEX3, Y3: PRINTS 
X; : RETURN 

402 IFX3<6THEN405 

403 1FRNDI 1 X.8THENX3=X3+1ELSEIFRNDC 1 ) >. 
9THENX3-X3-1 

404 G0T0406 

405 1FRNDI1 ) > . 6ANDX3>4THENX3=X3- 1ELSEX3= 
X3 + 1 

406 K1=SCREENIX3.Y3+1 » : G0SUB390 

407 IFKl=1330RKl*134THENGOSUB450:GOSUB36 
0: RE TURN 

408 G0SUB360 

409 Y3-Y3+1: IFY3<4THENLOCATEX3.Y3: PRINT© 
• I 

410 RETURN 

419 REM Heurt avec une autre voiture 

420 0UT6cHF4,0:F0Rl = lT0100: NEXT: OUTfcMFa, 7 
55 

421 SC-SC-100 

422 HY=HY-1: IFHY< 1THENI 1000 



423 RETURN 

429 REM Atfichage de la Vitesse 

430 L0CATE19,2:PRINTCHR*(139+V> I 

431 RETURN 

439 REM A+tichage de la voiture apres he 
urt 

440 L0CATEB,2:PRINTMV«1 

441 RETURN 

449 REM Cas de la crevaison 

450 IFCY=1THENCY=0:RETURNELSEL0CATEB,2!P 
R1NTVC*! :F0RI=1T0400:NEXT 

451 L0CATEB,2:PRINTMV»1 :Y3"Y3+2 

452 L0CATEX3, Y3-2:PRINT" "I 

453 L0CATEX3, Y3:PRINT8«I 

454 SC*SC-90/V 

455 RETURN 

479 REM Impression de la voiture supple 
mentaire 

480 L0CATEX2, Y2:PRINTVE»t 

481 RETURN 

484 REM Impression de la voiture supple 
mental re 

485 LOCATEXl.Yl:PRINTVE»i 

486 RETURN 

499 REM Deplacement en virage droite 

500 M3»X3:N3»Y3: IFN3<3THEN502ELSEG0SUB38 


501 G0SUB360:G0SUB370:L0CATEX3,Y3:PRINT0 
SI : RETURN 

502 IFX3M3THEN303 

503 1FRNDI1K.8THENX3=X3-1ELSEIFRNDID >. 
9THENX3=X3+1 

504 GOT0506 

505 IFRND ( 1 ) > . 6ANDX3< 13THENX3=X3+ 1ELSEX3 
-X3-1 

506 K1»SCREENIX3, Y3+1) : G0SUB390 

507 IFK1«1330RK1»134THENG0SUB450*. G0SUB36 
0: RETURN 

508 G0SUB360 

509 Y3»Y3+1IIFY3<4THENL0CATEX3,Y3:PRINT8 
*l 

510 RETURN 

999 REM Possibilite d'un heurt 

1000 IFKX M33ANDKK >134ANDK2<>133ANDK2< 
M34THENRETURN 

1001 G0SUB420 

1002 RETURN 

1099 REM Loterie de reanimation 

1100 L0CATE0.0: PRINT" Impair Pair" 
: : PRINT 

HOI PRINT,- "ICHRSI232) ICHRSI233) I " 
"I 

1102 PRINT CHRV.I228) ICHRe.1229) ICHR«(230i 
J 

1103 RT-INT(RND(1)*1000) : L0CATE7, 3: PRINT 
RTI 

1104 IFSTRIG<0)THEN1105ELSE11Q3 

1105 IFINTIRT/2)"RT/2THEN1120 



1110 l0cate6,2:printchr»(234) : :f0ri=1t07 
oo:next 

1111 CLSl G0SUB1 200: LOCATES, 2: PRINT -Score 

: -isc 

1112 IFSOoHIL) THENGOSUB 1300: LOCATES, 1 :P 
RINT-High score ! " 

1113 GUSUB100 

1114 G0T01400 

1120 FOR 1* IT 0300: NEXT: LOCATE 14. 2: PR I NTCH 
RSI 231 I i 

1121 F0RI-1T0300:NEXT 

1124 L0CATE14,2:PRINT" " J : F0RI=1T0300: NE 
XT 

1125 CLS:SC=INT (SC/2) 

1126 LOCATES, 2: PRINT "Score : "SC : : GOSUBI O 


1127 X1»0:X2"0 

1128 GOT05205 

1199 REM Game over 

1200 A»="Game over ": LOCATES, 1 

1201 FORI = 1T010:PRINTMID«(A«. I, 1) i : BEEP I 
,3: NEXT 

1202 F0RI»1T0400:NEXT 

1203 RETURN 

1299 REM Mise en fichier 

1300 IFSC<»HITL)THENRETURN 

1301 H(1L1«SC: INITwl, "CIR" 

1302 F0RLL«lT01O:PRINTttl,A«(LL) ,H(LL) : NE 
XTLL 

1303 RETURN 

1399 REM Autre partie 

1400 L0CATE0,3:PRINT" Autre tentative 7- 
I 

1401 A*=INKEYS: IFA«»"0" THEN1405 

1402 1FA«="N"THENCONSOLEO,4,0, 1, 1:CLS:EN 
D 

1403 G0T01401 

1405 sc=o: xi=o:x2=o:x3=o:Mi-o:M2=o:M3=o: 
Ri»o:R2=o:N3=o 

1406 Yl=o: Y2=o: Y3«o: T=o: B=o: cu«o: CH=o: CJ 
«o 

1407 CLS:G0T0S070 

1999 REM Deplacement transversal de la 
voiture 

2000 IFS«7THENBW=-1ELSEIFS-3THENBU«1 
2010 IFBU-OTHENRETURN ELSE IFBU=- 1THEN20 
30 

2020 B=B+BW : 0NECG0SUB2050, 2060, 2O70 

2021 KL-SCREENIB+1,2) : IFKL< >32ANDKL< >128 
ANDKL< >131THENG0SUB420 

2022 LOCATEB-l,2:PRINT" "IMVSt 

2023 RETURN 

2030 B=B+BW: 0NECGGSUB2100, 2090, 2080 

2031 KL=SCREEN(B,2t : IFKL< >32ANDKL< > 128 AN 
DKL< >129THENG0SUB420 

2032 L0CATEB,2:PRINTMV«; " "! 

2033 RETURN 

2049 REM Deplacement suivant decors 



2050 IFB=14THEN10000 

2051 RETURN 

2060 IFB«16THEN10000 

2061 RETURN 

2070 IFB-17THEN10000 

2071 RETURN 

2080 IFB=4THEN10000 

2081 RETURN 

2090 IFB»2THEN10000 

2091 RETURN 

2100 1FB=1THEN10000 

2101 RETURN 

499 7 REM******************************** 

4998 REM** Programme principal ** 

4999 REM******************************** 

5000 CLEAR500: D I MAX 1 61 8) , BXI618) :CLS:DEF 
STRD 

5002 CONSOLE, , . 0. 0: VES*CHR* ( 135) + CHRSM 13 
6) 

5003 MVS=CHR*1 133)+CHR*I134> : VCS'CHRSI 1 3 
3) +CHRSI137) 

5006 H1«=CHR«( 153) ♦CHRSI 154) : H2S=CHRS( 15 
5) »CHRSI156> 

5009 REM Enregistrement des *ichiers 

5010 PRINT" Magneto pret pour 1'enregis 
trement du fichier ?" 

S020 G0SUB100: G0SUB160: INI TW1 . "-CASI : " : MO 

TONON 

5030 A»INP(«1) : 1FA< >24THEN5030ELSEA% ( 1 ) = 

24 

5040 F0R1-2T0618:A«INP1I41I : AX ( I ) -CI NT ( A) 

INEXT 

S050 F0R1=1T0618: B»INPI«D : BX I I I =C INT ( Bl 

INEXT 

5060 M0T0R0FF:CLS:PRINT"Arret du magneto 

7" 
3061 G0SUB100 

5062 G0SUB160 

5063 A=0:B«0:F0RI«1T0618:A«A+AX(D :B=B+B 
XII) INEXT 

5065 1FA-42233ANDB-5607THEN3070 

S068 CLS:PRINT"Fichier incorrect ! ! Recom 

mencez ! " : END 

5070 INITHl, "CIR":F0RI-1T010:INPUTH1,A«I 

1 ) , hid INEXT 

5075 CLSIBU-1 

5079 REM Premier tableau d' opt ions 

5080 T»1IG0SUB1S0 

5090 a*>inkey«:l-ualia«) I IFA»«" -THENS090 

ELSE I FL >0ANDL < 6THEN3200 

5099 REM Deuxieme tableau d'options 
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3656 FOR E=l TO 6:F0R 1=38 TO VB STEP-1 

3655 A=INT(RND*7) + DC0L0RA:ATTRBD DLOCA 

TEI,6:PRINTB*(E):PLAY"05L4A8"+MB*(E):NEX 

TI 

3670 VB=VB+2:NEXT E 

3680 F0RI=6T0 5:F0R E=l TO 7: COLORE: LOCF 

TE15,9:PRINTB0NUS:PLAY"L305SI*":NEXTE:NE 

XT I 

3690 ATTRB0,6:COLOR7,4:SCO=SCO+BONUS:LOC 

ATE1, l: PR I NT "SCORE : "; SCO: B0NUS= 1600: LOC 

ATE14.DPRINT"B0NUS :"; BONUS: COLOR, 

3695 RETURN 

3780 ********************* 

3710 ** 2eme TABLEAU. .. * 

3720 ********************* 

3730 CLS:MAXI=37:MINI=3: :HP0S=26: VP0S=5 

3740 PRINTCHR*(27)CHR*(113):LINEC6,3)-(3 

9,3)GR*(1):B0XF(16, 8>-<30, 17>GR*C 1 > : LINE 

CB,6)-(4,6>CR*<1>:LINE<35,6)-<39»6)GR*<1 

):LINE(8, 17<-<4,17)GR$(5):LINEe39.17)-C3 

5,17>GR$<5> 

3745 LINE (8,22) -(39, 22)GRJ( 1 .) : LINEf 0. 23) 

-(39,23>GR*(3):B0XF(14, 18) -(17.21 >GR*(5. ) 

IL0CATE1,5:PRINTGR$(41):GR$(42':L0C«TE1. 

4:PRINTGR*(39);GRJ(48) 

3750 L0CATE37, 4: PRINTGR* (39 ) I GP* i 48 ) : LOC 

ATE37,5:PR1NTGR*(41):GR»(42):L0CATE1.7:P 

RINTGR$(29):GRt<39:i;GRt(31.):L0CATE36,7:P 

RINTGR*(29);GR*(30:>;GR*(31):LINE(2,8)-(2 

, 15)GR$(34):LINE(37,8)-(37. 15)GRJ(34) 

3755 LOCATED 16: PRINTGRt(35) I GRf (36),: GR* 

(37):L0CATE36, 16: PRINTGRt(35) : GR$(36) : GR 

JC37) 

3760 FOR 1=4 TO 21 : PRINTCHR*(27)CHR*( 119 

):L0C:ATE7.I:PRINTGR»(54>;GR*(55),:GR*':56) 

:L0CATE3D I : PRINTGR*(54); GR*(55)I GR$(56) 

:NEXT:GOSUB1908 

3770 IFDIAMS=1 THEN L0CATE19, 21 : C0L0R4: P 

RINTGR*'67«:L0CATE19,28:C0L0R6:PRINTGR$( 

66) 

3788 FLE=12:FLEC=5:SAB=28:SABR=7IFIN=8:P 

T=£2 

3798 IF PASSAGE=1 THEN LOCATEHPOS, VPOS: P 

RINT LOCATEHPOS, VPOS-H: PRINT LOCAT 

EHPOS. VPOS+2: PRINT" " : HP0S=2: VP0S=19: MAX 

I=12:MINI=l:GOSUB1780:LINE!0.17)-C0,21)G 

R*(1):G0T04668 

3800 ' *********************** 

3818 •* 2eme TABLEAU. . * 

3828 'ft********************* 

3822 ANTISO=0:I1AXI=32:MINI=8 

3824 IF HP0S=8 OR HP0S=32 THEN GOSUB4000 

: IF VP0S=5 THEN3830 ELSE 3988 

3830 G0SUB1588:G0SUB 2288: IF B0NUS=8 THE 

N 3860 

3834 GOSUB 4388: G0SUB4488 

3835 IF M0RT=1 THEN M0RT=8: GOTO 3850:ELS 
E IF M0RT=2 THEN t10RT=8:G0T0 3870 



3840 GOTO 3824 

3850 LOCATEHPOS, VPOS: COLOR 1,8: PR I NTGRt( 5 

7) 

3855 PLAY"L305A1SISI»LALA#S0S0#FAFA#MIRE 

D0»" 

3868 LOCATE FLE, FLEC:PRINT GOSUB 250 

0: FLE=0: MORT=0: GOTO3700 

3870 LOCATEHPOS, VPOS+2: COLOR 1, 0: PR I NTGR* 

(57) 

3875 PLAY"L305A1SISI»LALA»S0S0#FAFA#I1IRE 

DO*" 

3880 LOCATE SAB, SABR: PRINT GOSUB 250 

0:SAB=8:NORT=0:GOTO3708 
3894 '***************** 
3896 '***************** 

3900 IF PASSAGE=1 THEN MINI = 1 : MAXI = 12 EL 
SE MINI=0:t1AXI = 12 

3901 ANTISO=l:IF VP0SO5 THEN GOSUB 4808 
ELSE GOTO 3888 

3910 IF VPOS= 19 THEN GOTO 3920 

3911 GOSUB 2200: IF B0NUS=8THEN GOSUB 250 
0:MORT=0:GOTO3700 

3912 GOTO 3901 

3920 IF HP0S=32 THEN 4500 ELSE IF HP0S=8 

THEN 4668 
3940 GOTO 3900 
4000 '*************(****** 
4010 '* MONTER DESCENDRE * 
4020 '******************** 
4030 A=STICK<0) 

4040 ON A GOSUB 4100.4898.4090,4090,4200 
.4090.4890,4090 
4090 RETURN 
4106 '**********************» 

4110 '* MONTER * 

4120 ************************ 

4130 IF MN0T=1 THEN MN0T=8: M0NP=49: MONPE 

=51 ELSE MN0T=l:M0NP=52:M0NPE=53 

4140 VPOS=VPOS-l: IF POINT! HP0S*S,VP0S*8* 

2><>-l THEN VP0S=VP0S+1:RETURN 

4150 LOCATEHPOS, VPOS: COLORS, 8: PR I NTGRtCM 

ONP >: LOCATEHPOS, VPOS+1: PR I NTGR$ ( 50 ):LOCA 

TEHPOS, VPOS+2: PR I NTGR$( MONPE) 

4160 PRINTCHRt(27)CHR*(119):L0CATEHP0S-l 

,VP0S+3:PRINTGR*<54)GR»(55)GRS(56):PLAY" 
L4O3A0DOSIRE" 

4170 RETURN 

4200 ************************ 

4218 '* DESCENDRE.. * 

4220 ************************ 

4238 IF MNOT=0 THEN MN0T=1 : M0NP=49: MONPE 

=51 ELSE MNOT=0:MONP=52:MONPE=53 

4240 ;POS=VPOS+l:IF P0INT(HP0S*8, (VPOS+2 

)*3+2")-l THEN VPOS=VPOS-l:RETURN 

4256 LOCATEHPOS, VPOS: COLORS, 0: PR I NTGR* CM 

ONP ): LOCATEHPOS, VPOS + DPR I NTGR *i 50 ):LOCA 

TEHPOS, VPOS+2: PR I NTGR»( MONPE) 

4260 PRINTCHR*(27)CHR*C119>:L0CATEHP0S-1 

, VP0S-1:PR1NTGR*(54)GR*(55)GR*(56):PLAY" 

L403A8D0SIRE" 

4270 RETURN 

4300 '******************» 

4310 '* FLECHE * 

4326 ******************** 

4340 C0L0R6, 6: LOCATEFLE, FLEC: PRINT" ":F 

IN=1 

4358 FLE=FLE-DIF FLE=HPOS AND ACR=0 OR 
FLE+1=HP0S AND ACR=0 THEN M0PT=1 

4368 IF FLE=MINI+3 THEN LOCATE FLE,FLEC: 

PRINT FIN=8:FLE=MAXI-3:RETURN 



4378 L0CATEFLE,FLEC:PRINTGRt(62))GR$(63) 

: RETURN 

4480 ******************** 

4410 '* SABRE. * 

4428 ******************** 

4448 COLOR3,0:LOCATESAB,SABR:PRINT" " : F 

IN=1 

4450 SAB=SAB + DIF SAB=HPOS OR SAB + 1 = HP0S 

THEN M0RT=2 
4460 IF SAB=MAXI-3 THEN LOCATESAB. SABR: P 

RINT FIN=0:SAB=M1NI+3:RETURN 

4470 LOCATESAB, SABR : PR I NTGR* ( 43 );GR$< 44) 

: RETURN 

4500 ************************* 

4510 '* RECHERCHE DIAMANT * 

4530 ************************* 

4540 PT=22:TR=22:TRO=37:MAXI=39:MINI=20 

4545 IF HP0S=32 THEN GOSUB 4800: IF VPOS< 

> 19 THEN 3900 

4548 GOSUB 1500:GOSUB 2288: G0SUB4888 

4558 IF B0NUS=8 OR M0RT=1 THEN GOSUB 250 

0:TROU=0:MORT=0:GOTO3780 

4560 IF DIAMS=1 THEN GOSUB 4700 

4570 IF HPOS=MAXI THEN GOSUB3600: GOTO750 



4580 GOTO 4545 

4688 ****************** 

4612 ****************** 

4628 TR=2:TRO=14:TROU=0 

4630 IF HPOS=0 THEN GOSUB3600: G0T04988 

4632 IF HP0S=8 THEN GOSUB4800:IF VP0S<19 

THEN 3906 
4635 GOSUB1500 

4646 GOSUB 4868: IF M0RT=1 THEN GOSUB 256 
0:MORT=0: GOTO3706 
4656 GOSUB 2268 

4666 IF BuNUS=8 THEN GOSUB 2560: M0RT=6: G 
OTO 3760 
4676 GOTO 4636 
4768 ****************** 
4718 ** DIAMANT.. . * 
4726 ****************** 
4738 COULDIA=COULDIA+l: IF C0ULDIH=8 THEN 

C0ULDIA=6 
4740 PRINTCHR«(27)CHR*(112+C0ULDIA):L0CA 
TE19,26:PRINTGR*<66) 

4750 IF HPOS=MINI THEN LOCATE 1 9. 26 : PR I NT 
PLAY"L405A5D0D0RESIFALA#" :SC0=SC0+56 

ELSE RETURN 
4766 DIAMS=6:L0CATED 1 : C0L0R7, 4: PRINT" SC 
ORE : U ;SC0:C0L0R,8 
4776 RETURN 

4808 ******************** 
4818 ** SOL BRULANT. . * 
4826 ******************** 

4825 IF TROU=0 THEN TR0U=TR0U+1 : GOTO 483 

5 

4836 TROU=TROU+l: IF TROU =3 THEN TR0U=6: 

GOTO 4856 ELSE 4858 

4835 PRINTCHR$(27)CHR«(113):L0CATEDT,PT: 

PRINTGR*(1):GR*(1):T=TR0-TR:DT=INT(RND*T 

)+TR 

4846 LOCATE DT. PT: C0L0R1, 6: PRINTCHR*( 127 

).:CHRJ(127) 

4856 IF DT=HPOS OR DT+1=HP0S THEN M0RT=1 

: RETURN 

4868 RETURN 

4966 ****************** 

4916 ** 3eme TABLEAU. * 

4926 ' ***************** 



4938 C0NS0LE3.24:CLS:PRINTCHR*(28):PC0=1 

:B0NUS=1668 

4948 PRINT CHR*( 27) CHR* ( 1 1 3) : BOXF ( 8, 22 ) - 

<39,23)GR*(1):LINE(7, 17)-<39, 17)GR»(5):B 

0XF(7. 10)-(12, 16)GR*(1):B0XF(13, 16)-(17, 

10)GRJ(1 >:B0XF<18, 18>-(39, 16)GR*( 1 ) : BOXF 

<8,3)-(39,3)GR*(l) 

4958 FOR 1= 7 TO 37 STEP 3 : LOCATEI, 15: P 

RINTGR*C39)*GR*C48); LOCATEI, 16:PRINT 

GR*(41);GRJ(42)I NEXT*.L0CATE8,4:PRINT 

GR*(29);GR*(38);GR*(31) 

4955 LINE(D5)-(1,28)GR»(34):LOCATE0,2D 

PRINTGR*(35);GR*(36);GR*(37):BONUS=1806 

4966 PRINTCHR*C27)CHR»(119):F0R 1=4 TO 2 
DL0CATE4. I:PRINTGR*<54)*GR*(55)*GR*(56) 
:NEXT:FOR 1=3 TO 13: L0CATE35, I : PRINTGR*( 
54))GRt(55);GR»(56):NEXT:HC0=15:VCO=7 

4965 B0XF(34,13)-<26, 11) LINE<13,12)- 

(17, 12)GR*(69),2:PSET(14,11)GR*<15),7:PS 
ET(28, 13)GRt(67),DPSET(26, 13)GR*( 18), 7: 
PSET(28,12)GRt(66),3 

4967 PRINTCHR$(27)CHRt(112):PSET(15,4)GR 
*(4):LINE(39,4)-(39, 11)GR*(1): 

4978 GRI(0)=15:GRI(1)=17:GRI(3)=19:NGR=7 

:HG=17:GRI(4)=22:GRI(5)=23:GRI';6)=24:GRI 

(7)=28:GRI(2)=33:F0R 1=0 TO NGR:LOCATEGR 

I(I),HG:PRINTGR*<68):NEXT 

4980 IF GRAILLE=1 THEN HP0S=35: VP0S=7: PR 

INTCHR*(27)CHR«(113):B0XF(35,3)-(37,4)GR 

«( 1 ) : GOSUB 1 780 : GOTO5300 

4990 HPOS= 36:VP0S=19:MAXI=39:MINI=5:G0S 

UB 1908 

5888 '******************** 

5885 ' * JEU 3eae- TABLEAU * 

5887 ********************* 

5618 ANTIS0=DMINI=5:MAXI=39 

5828 IF HP0S=5 THEN GOSUB4000:IF VP0S<19 

THEN 5266 
5030 GOSUB 5106 

5035 GOSUB 2208 

5036 IF B0NUS=8 THEN M0RT=1 

5037 IF M0RT=1 THEN GOSUB2500: MORT=0 : GOT 
04940 

5040 GOSUB 1500 

5050 IF HP0S=39 THEN PASSAGE=1 : CONSOLES, 

24,0,0:CLS:GOTO 3740 

5866 GOTO 5828 

5186 ******************** 

5112 ** GRILLE * 

5113 ******************** 

5114 H=INT(RND*NGR) 

5126 FOR 1=1 TO 4: LOCATEGRI ( A), HG+I : COLO 
R3,e:PRINTGRt(7e):PLAY"AeL103D0SIREFA" 

5138 LOCATE GRI (A), HG+I : PRINT NEXT 

5148 IF HPOS=GRI(A) THEN M0RT=1 

5158 RETURN 

5286 ******************** 

5216 GOSUB 4888 

5238 IF VP0S=7 THEN 5368 

5248 IF VP0S=19 THEN 5688 

5258 GOSUB 2286 

5255 IF B0NUS=6 THEN M0RT=1 
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77 LODE 



Tl 99/4 A BASIC ETENDU 



Soar 
£ofrl 



II parait qu'en ces lieux oublies soi-disant peupl^s de mons- 
tres subsistent encore d'inestimables tresors... 

Sylvain PERUZZI 



SUITE DU 
N°130 



LL):: IF LLO40 THEN 1930 

1750 CALL FH(SC) 

1760 CALL LOCATE (HI. MM- X,NN> : : CALL PATT 

ERN(ttl, 120) 

1770 CALL L0CATE(#1,MM-X»2,NN> : : CALL PA 

TTERN(#1, 124) : : MM=MM-X*2 

17B0 GOTO 1930 

1790 CALL SPRITE(lt6,96,7.MM+5,NN+10>:: C 

ALL LOCATE (#6. MM+8, NN+10) : : CALL SOUND ( 1 

0.440,0):: CALL LOCATE (#6. MM+13, NN+10) 

1800 CALL HCHAR (INT (MM/8) +3, INT (NN/8) +2. 

32) 

1810 CALL DELSFRITE(II6> : : GOTO 1930 

1820 CALL SFRITE(lt6,96,7,MM+5.NN-07>: : C 

ALL LOCATE (#6, MM+8, NN-07) :: CALL SOUND ( 1 

0,440,0):: CALL LOCATE (#6, MM+13. NN-07) 

1830 CALL HCHAR(INT(MM/8>+3, INT(NN/8>,32 

):: CALL DELSPRITE (#6) : : GOTO 1930 

1B40 CALL GCHAR (INT (MM/8) +2, INT (NN/B) ,K1 

):: CALL GCHAR ( INT (MM/8) +2, INT (NN/B) -1 , K 

2) 

1850 IF Kl=33 OR K2=33 THEN 1930 

1860 CALL PATTERN (#1, 112) :: CALL LOCATE! 

#l,MM-4,NN-4) :: CALL LOCATE (#1 , MM-B, NN-8 

) 

1870 CALL L0CATE(*1,MM-4,NN-12):: CALL L 

0CATE(ttl,MM.NN-16> : : NN=NN-16 :: GOTO 19 

30 

18B0 CALL GCHAR(INT(MM/8)+2, INTINN/81+2, 

K2>:: CALL GCHAR ( INT (MM/8) +2. INT (NN/B) +3 

,K1> 

1890 IF K2=33 OR Kl=33 THEN 1930 

1900 CALL PATTERN (#1,11 6) : : CALL LOCATE! 

ttl,MM-4.NN+4,ltl,MM-8.NN+B,#l,MM-4,NN+12, 

ttl,MM,NN+16> : : NN=NN+16 :: GOTO 1930 

1910 CALL PATTERN! ft 1,UY> 

1920 CALL LOCATE (#1, MM+8. NN) : : MM-MM+8 : 

: GOTO 1930 

1930 11=11+1 

1940 CALL GCHAR(INT(M0(II)/8)+2, INTINOd 

I)/B)+1,KL) :: IF KL=32 THEN 2080 

1950 IF KL=40 AND MOdlXMM THEN 2080 

1960 CjALL GCHAR! INTIMO(II) /8) . INT(NOIII) 

/B)+1,;KL):: IF KL=40 AND MOdIOMM+10 TH 

EN 2100 

1970 CALL GCHAR(INT(M0(II)/8+l) . INT (NO (I 

I) /B)+2,KL) :: IF KL<>33 AND NOdlKNN TH 

EN 2130 

1980 CALL GCHAR(INT(M0(II)/8) + l. INTINOd 

I)/B),KL):: IF KL<>33 THEN 2160 

1990 101 (II)=IOI (II>+1 :: IF I0KIIX6 T 

HEN 21B0 ELSE OUI=INT ( 16*RND) +2 :: RY=IN 

T ( INT (25*RND) +2) 

2000 CALL L0CATE(ttII.0UI*8+l,RY*B+l> 

2010 M0(II)=0UI*B+1 :: NO ( 1 1 > =RY*8+1 

2020 GOTO 2180 

2030 ! '. 

2040 ! DEPLACEMENT DES MONSTRES 

2050 ! 

2060 ! 

2070 ! 

2080 CALL L0CATE<ttII.M0!II)+8.N0(II) > : : 

M0(II)=MO(II)+B :: CALL COINC (ttl I . ttl , 10. 

JL):: IF JL=-1 THEN 2200 

2090 IDI(II>=0 :: GOTO 21B0 

2100 CALL LOCATE(#II,MO(II)-B,NO(II) ):: 

MO(II)=MOIII)-B :: CALL COINC (#1 1 , #1 , 10, 

JL):: IF JL=-1 THEN 2200 

2110 IOI(II)=0 :: GOTO 21B0 

2120 ! 

2130 CALL LOCATE(#II,MO(II) ,N0(II)+8) : : 

N0(II)=NO(II)+B :: CALL COINC (#1 1 , #1 , 10, 

JK):: IF JK— 1 THEN 2200 

2140 IOI(II)=0 :: GOTO 21B0 

2 1 50 ! 

2160 CALL LOCATE(#II,MO(II) ,N0(II)-8) :: 

NOIII)=NOIII)-B :: CALL COINC (#1 I , #1 , 10, 

KL):: IF KL—1 THEN 2200 
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2170 101 (111=0 

2180 IF 11=4 THEN 11=2 

2190 GOTO 1440 

2200 MEN=MEN-1 

2210 DISPLAY ATI23, 17)SIZE<2) : MEN 

2220 CALL DELSPRITE (ALL) : : IF MEN=0 THEN 

2250 
2230 GOSUB 500 
2240 GOTO 1400 

2250 DISPLAY AT ( 10, 1 1 ) : "GAME OVER" :: FO 
R P3=l TO 600 :: NEXT P3 

2260 SC=0 : : FOR TYT=2 TO 20 : : CALL HCH 
AR(TYT,2,32,30):: NEXT TYT 
2270 CALL COLOR (8, 9, 1 ) : : CALL COLOR (0,9, 
1):: DISPLAY AT(10,7):"LA PARTIE EST FIN 
IE" 

22B0 DISPLAY AT ( 13, 7) : "VOULEZ VOUS REJOU 
ER" 

2290 ACCEPT AT ( 14, 10) VALIDATE ( "OUIN" ) BEE 
P:C* :: IF SEG*(C», 1, 1)="0" THEN 240 ELS 
E CALL CLEAR : : END 

2291 REM +++++++ 

2292 REM + SUB + 

2293 REM +++++++ 

2300 SUB P(MM,NN,SC,PP) 

2310 CALL GCHAR(INT(MM/B+2), INT(NN/8+l) , 

LL):: IF LLOBB THEN SUBEXIT 

2320 CALL HCHAR ( INT (MM/B+2) , INT (NN/8+1 ) , 

32):: CALL SOUND (20, 110, 0) : : SC=SC+150 

2330 DISPLAY AT 123, 6) SI ZE (6) : SC 

2340 PP=PP+1 :: SUBEND 

2350 SUB FH(SC) 

2360 SC=SC+5 :: DISPLAY AT (23, 6) SI ZE (6) : 

SC 

2370 SUBEND 

23B0 SUB K (LEVEL) 

2390 FOR K=2 TO 20 :: CALL HCHAR IK, 3, 32, 

28) : : NEXT K 

2400 DISPLAY AT ( 10, 1 1 ) : "LEVEL "&STR«(LEV 

EL) 

2410 FOR TTY=1 TO 200 :: NEXT TTY 

2420 SUBEND 



LISTING 2 



90 ON WARNING NEXT 

100 UY=U6 :: 0P=4 :: SC=0 :: LEVEL=0 

110 CALL CLEAR :: CALL SCREEN (2) 

120 CALL CHARI33. "OOFDFDFDOOBFBFBF" , 40, " 

OOFDFDFDOOBFBFBF " , 38 , " 3C4299B 1 B 1 99423C " ) 

130 CALL COLOR (1,5, 1,2,9, 1) 

140 CALL CHAR (34, "OOCOEOFOOOBCBEBF" , 35, " 

OOFCFCF900AOC080" , 36 , " 000 1 050D003F3FBF " , 

37, "003D1D0D00070301") 

150 CALL HCHAR (4, 14,33,5):: CALL VCHAR(5 

,16,33,3):: CALL VCHAR (4, 21 , 40, 4) 

160 CALL VCHAR (9, 7, 33, 9) : : CALL HCHAR(17 

,7,33,23X1 CALL HCHAR! 10, 9, 40,5) 

170 CALL VCHAR (10, 9, 40, 6) : : CALL VCHAR d 

0,13,40,6):: CALL HCHAR ( 15, 9,40,5) 

1B0 CALL HCHARdO, 15,33,5) :: CALL HCHAR! 

15,15,33,5):: CALL VCHAR ( 1 1 , 15, 33,4) : : C 

ALL VCHAR (11, 20, 33, 4) 

190 CALL HCHAR (10, 20, 34, 1) : : CALL HCHAR! 

15,20,35,1):: CALL HCHAR ( 14, 19, 36, 1 ): : C 

ALL HCHARIll, 19,37) 

200 CALL HCHAR (10, 23, 40, 6) : : CALL HCHAR ( 

12,23,40,4):: CALL HCHAR ( 15, 23, 40, 6) : : C 

ALL VCHAR (10, 23, 40, 6) 

210 FOR TT=3 TO 14 :: CALL COLOR (TT, 5, 1 ) 

:: NEXT TT :: DISPLAY AT (23, 12) : "M985 

S. PERUZZI" 

220 CALL KEY(0,K,S>:: IF S=0 THEN 220 

230 CALL CLEAR : : CALL CHARSET : : CALL C 

0L0Rd,9,l):: FOR TT=2 TO 14 :: CALL COL 

0R(TT,5, 1) : : NEXT TT 

240 DISPLAY AT (5, 12) : "MENU" 

250 DISPLAY AT ( 10, 1 ) : " 1-POUR CREER DES T 

ABLEAUX" 

260 DISPLAY AT ( 13, 4) : "2-POUR CREER DES T 

ABLEAUX SANS LES SAUVEGARDER" 

270 DISPLAY AT ( 16, 4) : "3-POUR RAPPELER DE 

S TABLEAUX" 



y\trr 



280 DISPLAY AT ( 18. 4) : "4-POUR MODIFIER UN 

TABLEAU" 
290 CALL C0L0R(0,5, 1) : : DISPLAY AT(21,5) 
:"VOTRE CHOIX" :: ACCEPT AT (22, B) VALIDAT 
E("1234")BEEP SIZEdXCS 
300 MEN=5 

310 DIM NE(2),ME(2) , MO (4) . NO (4) , 00 (4) , 10 
I (4>.AE*(40>,KJ<2>,JK(2>,JL(2),LJ(2>:: L 
EVEL=0 

320 ON CS GOTO 330,330,760,950 
330 CALL CLEAR :: DISPLAY AT ( 12, 4) : "COMB 
IEN VOULEZ VOUS CREER DE TABLEAUX? ( 1-2) " 

:: ACCEPT AT ( 15, 10) VALIDATE (" 12" ) SIZE ( 1 
):TA 

340 CALL COLOR (0,5,1) 
350 GOSUB 1050 
360 GOSUB 1120 
370 GOSUB 1160 
380 GOTO 640 

390 TAP=0 :: A=l :: KL=9 :: LK=17 :: CAL 
L SPRITE(#B,36,9,9, 17) 

400 Y=0 :: X=0 :: CALL KEY(0,K,S):: IF S 
<>0 THEN 410 ELSE 400 

410 IF K=ASC("D")AND LK<224 THEN Y=B :: 
X=0 : : GOTO 470 

420 IF (K=13 AND 0PI = 1 > AND I ITY=1 AND UIY 
=1)THEN RETURN ELSE 430 

430 IF K=13 THEN CALL SOUND < 100, 440, 0) 
440 IF K=ASC("S")AND LK>17 THEN Y=-8 :: 
X=0 ! : GOTO 470 

450 IF K=ASC("E")AND KL>9 THEN X=-B :: Y 
=0 : : GOTO 470 

460 IF K=ASC("X")AND KL<153 THEN X=8 : : 
Y=0 : : GOTO 470 

470 IF K=ASC("N")THEN A=l :: GOTO 550 
480 IF K=ASC("M")THEN A=2 :: G=88 :: GOT 
550 

490 IF K=ASC ( " , " ) THEN A=2 :: G=33 :: GOT 
550 

500 IF K=ASC (".") THEN A=2 :: G=40 :: GOT 
550 

510 IF K=ASC("B")THEN A=2 :: G=32 :: GOT 
550 

520 IF K=ASC("H")THEN 610 
530 IF K=ASCI"J")THEN 620 
540 IF K=ASC("K")THEN 630 
550 ON A GOTO 560, 5B0 
560 CALL LOCATE! #8, KL+X.LK+Y) 
570 KL=KL+X : : LK=LK+Y : : GOTO 400 
580 CALL LOCATE (#8, KL+X, LK+Y) : : KL=KL+X 
: : LK=LK+Y 

590 CALL HCHAR < INT (KL/B1+1, INT (LK/B) +1 , G 
) 

600 GOTO 400 

610 0PI = 1 :: CALL P0SITI0N(#8, DD,FF) : : C 
ALL SPRITE(*1, 128, 16,DD-4,FF): : GOTO 400 
620 UIY=1 :: CALL POSITION (#8, DD. FF) : : C 
ALL SPRITE(»3, 104, 11,DD,FF) : : GOTO 400 
630 ITY=1 :: CALL POSITION (#8, DD. FF) : : C 
ALL SPRITE (#4, 104,9, DD,FF) : : GOTO 400 

640 FOR U-l TD TS 

641 IF CS=4 THEN 646 

645 IF CS=1 OR CS=2 THEN CALL H 

646 GOSUB 390 

650 FOR 1=2 TO 20 : : FOR T=3 TO 30 : : CA 
LL GCHAR(I,T,RJ) : : AE* < 1+ <20» (U-l > ) > =AE* 
(I+(20«(U-1) ) )8iCHRt!RJ) : : NEXT T :: NEXT 

I 
660 CALL POSITION (#1, ME (U) ,NE(U) ,#3, JK(U 
) ,KJ(U> ,#4, JL(U) ,LJ(U) ) : : CALL DELSPRITE 
(ALL) : : NEXT U 

670 CALL DELSPRITE (ALL) : : CALL CLEAR 
680 IF CS=2 THEN GOSUB 1120 :: GOTO 12B0 
690 DISPLAY AT (8, 10) BEEP: "SAUVEGARDE" 
700 DISPLAY AT (9, 10) BEEP: "====— ====" 
710 FOR UI0=1 TO TA :: OPEN ttUIO: "CS1 " , F 
IXED.OUTF'UT, INTERNAL 

720 FOR T=2 TO 20 :: PRINT #UIO: AEt ( T+ ( 2 
0*(UI0-1> ) ) : : NEXT T 

730 PRINT #UIO:ME(UIO) ,NE(UIO) ,KJ(UIO) ,J 
K(UIO) ,JL(UIO) .LJ(UIO) 
740 CLOSE #UIO :: NEXT UIO 
750 CALL CLEAR :: GOSUB 1120 :: GOTO 12B 
O 

760 CALL CLEAR :: DISPLAY AT (2, 13) : "RAPP 
EL " : : DISPLAY AT (07, 1 ) : "COMBI EN VOULEZ 



VOUS RAPPELER DE TABLEAUX (1-2)" :: ACC 
EPT AT(10. 14)VALIDATE("12")BEEP SIZE(l): 
KC 

770 IF KOI THEN 830 

7B0 CALL CLEAR :: DISPLAY AT ( 12. 8) : "RAPP 
EL" :: DISPLAY AT ( 1 3, 8) : "======" 

790 OPEN #1: "CS1", FIXED, INPUT .INTERNAL 
300 FOR T=2 TO 20 : :' INPUT HI : AEt (T> : : M 
EXT T 

'810 INFUT #1:ME(1) , NE ( 1 ) ,1 J<1) ..II (1) . JL ( 
1) ,LJ(1) 

820 CLOSE #1 :: GOTO 910 

830 FOR 1 = 1 TO KC :: OPEN ttl : "CS1 ", INTER 
NAL, FIXED, INPUT 

840 FOR UI=2 TO 20 :: INFUT ttl : AEJ (UI+ (2 
0*(I-1) ) ) : : NEXT UI 

850 INPUT #I:ME(I) , NE ( I ) ,KJ(I) , JK ( I ) , JL ( 
I) .LJ (I) : : CLOSE #1 
860 IF 1=2 THEN 910 

870 CALL CLEAR :: DISPLAY AT ( 12, 03) : "PRE 
MIER TABLEAU CHARGE" :: DISPLAY AT (13, 3) 

B80 DISPLAY AT ( 15, 2) : "ETES VOUS PRET POU 
R CHARGER LE SECOND TABLEAU''" 
B90 DISPLAY AT119, 10):: DISPLAY ATU9.10 
): "ENTER" :: CALL KEY <0,0,P> : : IF 0=13 T 
HEN 900 ELSE 890 
900 NEXT I 
910 GOSUB 1050 
920 GOSUB 1120 
930 GOSUB 1160 
'940 TA=KC :: GOTO 12B0 

950 CALL CLEAR :: DISPLAY AT ( 10, 07) : "MOD 
IFICATION D'UN TABLEAU" 

960 OPEN ttl: "CS1". INTERNAL. FIXED, INPUT 
970 FOR 1=2 TO 20 :: INPUT til: AEt (I):: N 
EXT I 

9B0 INPUT *1:ME(1) ,NE(1),KJ(1) . JK(1) , JL( 
1) ,LJ (1) : : CLOSE ttl 

990 0PI = 1 :: ITY=1 :: U1Y=1 :: GOSUB 105 


J 000 GOSUB 1120 
1010 GOSUB 1160 

^020 FOR 1=2 TO 20 :: DISPLAY AT (I , 1 ) : AE 
*<!>:: NEXT I 

1030 CALL SPRITEIttl. 128, 16,ME(1) , NE < 1 ) ,11 
3. 104,9.KJ(1) , JK(1) .#4. 104, ll.JL(l) , LJ (1 
?> 

1040 TA=1 : : GOTO 640 
1050 RANDOMIZE :: CALL CLEAR 
1060 CALL SCREEN (2) 

1070 CALL CHAR (88. "FFOOFFOOFFOOFFOOFF" ) 
1030 CALL COLOR (8, 9, 16) 

1090 CALL CHARI33, "OOFDFDFDOOBFBFBF"): : 
CALL COLOR (1,5,1) 

1100 CALL CHAR(40, "4242427E42424242") 
|ll 10 CALL CHAR(36, "FF81B1B1B1P.-:S1FFOOOOO 
0000000000)000000000000000000000000000000 
0000000"):: CALL COLOR (2, 15, 1 ) : : RETURN 
1120 CALL HCHAR (1, 1,33.32) :: CALL HCHAR ( 
£4,1,33,32)11 CALL VCHAR (1, 1,33,24) : .- CA 
LL VCHAR (1,32, 33, 24) 

1130 CALL HCHAR (21, 1,33,32*4) : : CALL VCH 
AR(1, 1,33,48) : : CALL VCHAR ( 1 , 30, 33, 72) 
1140 CALL C0L0R(4, 9, 1,5,9, 1,6.9, 1,3,9, 1, 
7,9, 1) 

M50 DISPLAY ATI 23, 1) : "SCORE 0000!! MEN !0 
! ! LEVEL! 01" : : RETURN 
1160 CALL MAGNIFY (3) 

1170 CALL CHAR (112, "202C2C241F0404040C14 
1414 1 40400008080808000000000000000000 " ) 
1180 CALL CHAR (116, " 20262624 1F0404040605 
05050504000080808080000000000000000000" ) 
1190 CALL CHAR ( 120, "000616120B0602020207 
OD081800000040C08080000000000000808080CO 
") 

1200 CALL CHAR (124, "101 BOBOA060302020207 
OD080B 1 B000000004040B000000000008080CO " ) 
1210 CALL CHAR ( 1 28 , " 30302068B0A0203028E8 
8808000000000000000000000000000000000000 
00") 
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S100 T=2:G0SUB150 

5110 A»»INKEY«:L-VAL1A»> : IFA«=" "THEN5110 

ELSEIFL< >1AND(L<60RL>9) THEN3080 

5200 EC-2: IFL»IANDT=2THENL=10 

5201 EC-2 

5202 TL«L 

5205 CJ-VAL("«cH"+MID«(A»(LI ,2, II ) :CH-l:C 
LS 

5210 PRINT" Nombre de touri ? de 1 
* 9"! 

5211 A»»INKEY»:8"VAL(A«I : IF<3< 10RS>9THEN5 
211 

3212 CLS: INPUT"Nombre de voiturii deeir 
• "IHY 

5219 REM Mise en place du decor 

5220 DATA1, 1,1, 2, 0,0,0, 0,0, 0,0, 0,0, 0,0,0 
,4,1,1,1 

5225 DATA1, 1,1, 3, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0 
•3,1,1, 1 

5230 DATA1, 1,2, 11, 11, 11, 11, 11, 11, 11, 11, 1 
1,11,11 

5231 DATA11 , 11, 11,4, 1, 1 

5Z3S DATA 1 , 1,3, 0,0, 8 , 9 , 0,0, 6 , 7 , 0,0, 8 , 9,0 

,0,5, 1 

5240 REST0RE5220:CLS:F0RI-1T079:READT: IF 

T-OTHENPRINT- ■ i : NEXT : S0T05260 

5250 PRINTCHR«(127+T) i :NEXT 

5260 FORI=24T031: LINE (114, I! -(119, I) : NEX 



TI 

5269 REM Depart 

5270 L0CATE6,0:PRINT"Moteur ?":CY=1 
5275 G0SUB100:L0CATE5,0:PRINT" 

"I 

5280 0UTI.HF4 , 255! 0UTMHF2 , 2600MOD270! OUTfc 

HF3,2600\270 

5282 F0RI=1T0800:NEXT 

5285 F0RI = 9T00STEP-l: LOCATE 19,0: PR INTCHR 

•(139+1) 

5290 F0RJ»1T0120:NEXTJ, I 

5295 LOCATE 19,0: PR I NTCHR* ( 128) : V»l : W=0:G 
0SUB170 

5296 S0SUB430:U<1 

5300 LOCATES, 2IPRINT" " : LOC 

ATE3.3 

5305 F0RI = 1T06:PRINTCHR«(138) I : NEXT: PR IN 

TMV«i 

5310 F0RI»IT06:PRINTCHR«(138I I :next:t=-i 

:B=9 

5312 G0SUB200 

5314 REM Ordre de depart (aleatoire) 

5315 X1=0:X2=0:R=RND(0I :R=RND(t) : IFR>.25 
THEN5325 

5320 L0CATE5,2:PRINTVE*i " "iVE*:Xl= 

5:X2=13 

5322 Yl=2: Y2 = 2:G0T05350 

5325 1FR>.5THEN5335 

5330 LOCATES, 2: PRINTVE*! : XI =5: Y 1=2: X2=IN 

r ( ( RND ( 1 ) + . 5 ) *9 ) : Y2=0 

5332 G0SUB480:G0T05350 

5335 IFR>.75THEN5350 

5340 L0CATE13,2:PRINTVE*i : Xl=13: Yl=2: X2= 

INT( (RND(l) +.51*9) 



5342 Y2=0:G0SUB480 

5350 L0CATE3,3:PRINT - "IMV*!" 

5355 SC=SC»120 

5360 FOR I = 1 T0300! NEXT : L0CATE9 , 3 : PR INT ■ 

3363 L0CATE9,2:PRINTMV«I 

5370 IFX1=0ANDX2»0THENG0SUB350 

5989 REM Premiere boucle principale 

5990 CK-1 

6000 S-STICK (0) : IFS"30RS=70RS=0THENG0SUB 

2000 

6010 SOSUB300 

6012 S-STICK(O) : IFS"30RS«70RS=0THENG0SUB 

2000 

6015 G0SUB320 

6020 CK-CK+1 : IFCK-1 . 7*CJTHENGOT06990 

6100 V»-INKEY«:F-VAL(V«) 

6200 IFF >OANDF< 6THENV=F : GOSUB170 

6300 G0T0600O 

6989 REM Deuxieme boucle principale 

6990 CY-1 :CK=1 :X3"0: Y3=0:G0SUB370 

7000 G0SUB340 

7001 S0SUB250 

7002 IFX3O00RY3O0THEN7010 

7005 IFEC=1THENG0SUB385ELSE60SUB380 

7010 S»STICK(OI I IFS-30RS=70RS=0THENG0SUB 

2000 

7020 IFEC=1THENG0SUB400ELSEG0SUB500 

7030 CK=CK+l: IFCK<30THEN7010 

7040 M3=X3:N3=Y3:G0SUB360: IFEC=1THENG0SU 

B140ELSEG0SUB120 

7050 X1=0:X2»0:G0T05370 

9999 REM Cas d ' un heurt 



10000 G0SUB260 

10050 F0RI=1T0800:NEXT 

10060 B*=" Sortie de route" 

10100 GOT030000 

liooo fori=ito70o:next:cls 

11010 0UTI<HF4,0: GOTO 1100 

20000 F0RI=3800T0385O: BEEP I , 1:NEXT 

20010 B*="La boite est cafisee" : CLS: G0T03 

0000 

29999 REM Perte de la oartie 

30000 CLS: GOSUB 1200: LOCATEO, 0: PR INT B«: GO 
SUB 1300 

30010 L0CATE5,2:PRINT"Score :"SCi 

30020 GOT01400 

49999 REM Gain de la partie 

50000 F0RI=1T0800:NEXT 
50005 G0SUB1300:CLS 

50010 IFSC=H(TL)THENL0CATE5, l:A«=-High s 

core":G0SUB1201 

50020 LOCATES, 2: PRINT" Score :"SC 

30030 REST0RE50040:F0RI=1T018:READA,B:BF 

EPA.B 

50035 NEXT:G0T01400 

50040 DATA 1,8, 6, 8,0, 1,6,8,8,8,0, 1,8,8, 13 
, 16, 10 

50041 DATA4, 6, 8, 10,8,6,4,3,8 

50042 DATA11, 12,8,8,5,4,6,8,0, 1 
60000 IFERL=4060RERL=506THENRESUMENEXT 
61000 PRINT ERRIERL:END 
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CATACOMBES 

Equipe d'un hfjlicoptere dorsal et de queiques pains de plas- 
tic, partez a la recherche de 7 blocs d'uranium enrichi, repar- 
tis dans 10 salles souterraines reputees dangeureuses... 



Stephane VALLOIS 
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3900 GOSUB 5501 IF e=0 THEN 3300 

3310 IF e==2 THEN y=180:G0T0 3840 

3320 y==18 

3330 REM tb 3 

3340 RESTORE 1520: e=0 : GOSUB 4310:e 

e=3 

3350 GOSUB 550: IF e=0 THEN 3350 

3360 IF e=2 THEN y=180:G0T0 3Q30 

3370 IF e==3 THEN x=4:G0T0 4040 

3380 x=573 

3330 REM tb 4 

4000 RESTORE 1780 I 8=0 I GOSUB 4310:e 

e=4 

4010 GOSUB 550: IF e = THEN 4010 

4020 IF e=3 THEN x=4:G0T0 3330 

4030 IF e=4 THEN x=573:G0T0 4080 

4040 REM tb 5 

4050 RESTORE 2040 : e = : GOSUB 4310:e 

e=5 

4060 GOSUB 550: IF e=0 THEN 4060 

4070 x=573:G0T0 3330 

4080 REM tb E 

4030 RESTORE 2300 :e==0 : GOSUB 4310:e 

B»6 

4100 GOSUB 550: IF e = THEN 4100 

4110 IF 3=3 THEN x==4:G0T0 3330 

4120 IF e = 1 THEN y=18:GOTO 4140 

4130 x=573:G0T0 4270 

4140 RESTORE 2560 : e=0 : GUSUB 4310:e 

e==7 

4150 GOSUB 550: IF e = THEN 4150 

4160 IF s==2 THEN y=180:G0T0 4080 

4170 y==18 

4180 REM tb 8 

4130 RESTORE 2820 : e=0:G0SUB 4310:e 

e==8 

4200 GOSUB 550: IF e=0 THEN 4200 

4210 IF e=2 THEN y=180:G0T0 4140 

4220 IF e==1 THEN y=18 

4230 REM tb 3 

4240 RESTORE 3030 : e=0 : GOSUB 4310:e 

e==3 

4250 GOSUE: 550: IF e = THEN 4250 

4260 y=180:G0T0 4180 

4270 REM tb 10 

4280 RESTORE 3350 : a=0 : GOSUB 4310:e 

e = 10 

4230 GOSUB 550: IF e = THEN 4230 

4300 x=4:G0T0 4030 

4310 EVERY 10000,1 GOSUB 640:WIND0 

Ul SWAP 0,1: PAPER 7:CLS:F0R i = 1 TO 

23:READ b:FOR J«1 TO 20 

4320 a=MIO*(b, j,1 ) : IF a=CHR»C32> T 

HEN PRINT a; 

4330 IF a = "o" THEN PAPER 14:PEN 10 

:PRINT CHR*<255> ; :F'APER 0:PEN 1 

4340 IF a = "x" THEN PAPER 11:PRINT 



" "; : PAPER 

4350 IF a="0" THEN PAPER 14:PEN 1? 

: PRINT CHR$< 255);: PAPER 0:PEN 1 
4360 IF a = "X" THEN PAPER 14:PEN 13 

:PRINT CHR*(255> ; : PAPER 0:PEN 1 
4370 IF a = "z" THEN PAPER 7:PRINT " 

" ; : PAPER 
4380 NEXT j,i. 

4330 EVERY 7,1 GOSUB 640: WINDOW "SW 
AP 0,1: CALL s , x ,y , x , y : RETURN • ' 
4400 REM 

4410 REM ===== PROCEDURE EXPLOSION 
4420 REM 

4430 t1==TEST<x-8,3SB-y*2> :t2=TEST< 
x+64,338-y*2) 

4440 IF t 1 > 1 1 THEN FOR i=0 TO 30:S 
OUND 2, 0,10, 7-1/30, 0,0,25:PL0T x-2 
,338-y*2-i,0:DRAWR -65, 0: NEXT : GOTO 

4470 
4450 IF t-2>11 THEN FOR i = TO 30:S 
OUND 2,0, 10, 7-1/30, 0,0,25:PL0T x+6 
2 , 338-y*2- i , : BRAWR 60,0: NEXT : GOTO 

4470 
4460 RETURN 

4470 gre=gre~1 : LOCATE 17,1:PRINT g 
rs;CHR$(8);" ";:RETURN 
4480 REM 

4430 REM ■■■ PROCEDURE INTRODUCTIO 
N 

4500 REM 

4510 FOR i=0 TO 6:S0UND 3,0,10,7-i 
,0,0, 30: NEXT 

4520 LOCATE 1,25:F0R i=1 TO 41:PRI 
NT: NEXT: MODE 

4530 FOR i=2 TO 70:F0R J=-1 TO 1 
4540 CALL s , 304+j»150 , i , 304+ J*1 50, 
i-1:NEXT j,i 

4550 FOR i=2 TO 50:CALL s,223,i,22 
9,i-1:CALL s , 373 , i , 373, i - 1 : NEXT i 
4560 FOR i=2 TO 30: CALL XBD13:CALL 

8BD19:CALL s,304, i ,304, i-1 :NEXT i 
4570 i=1:F0R h=64 TO 68 STEP 2 
4580 PLOT 0,h,i:DRAWR 58,0: MOVER - 
58,0:0RAWR 0,34:DRAWR 58,0: MOVE 4, 
hiORAWR 0,47 

4530 PLOT 64,h,i:DRAWR 0,34:DRAWR 
58,0:DRAWR 0,-34: MOVE 68,h:DRAWR 
,47:DRAWR 54,0 
4600 PLOT 156,h,i:DRAWR 0,34:DRAWR 

-28,0:DRAWR 58,0:M0VE 160,h:DRAWR 

0,47 
4610 PLOT 132,h,i:DRAWR 0,34:DRAWR 

58,0:DRAWR 0,-34:M0VE 13E,h:DRAWR 

0,47:DRAWR 54,0 
4E20 PLOT 256, h, i :DRAWR 58 , : MOVER 

-58,0:DRAWR 0,34:DRAWR 58, 0; MOVE 
260,h:DRAWR 0,47 
4630 PLOT 320,h,i:DRAWR 58,0:DRAWR 

0,34:DRAWR -58,0:DRAWR 0,-34:DRAW 
R 4,0:DRAWR 0,47 
4640 PLOT 384,h, t :DRAWR 0,34:DRAWR 

58,0:DRAWR 0,-34: MOVE 388,h:DRAWR 

0,47 
4650 PLOT 448,h,i:DRAWR 58,0:0RAWR 

0,47:DRAWR -54,0:ORAUR 0,-47:M0VE 
R -4,0:DRAWR 0,34:0RAWR 47,0:DRAWR 

0,-47 
4660 PLOT 512,h:DRAWR 58,0;M0VE 51 



6,h:DRAWR 0,47:DRAWR 47,0: MOVE 512 

,h:DRAWR 0,34:DRAWR 58,0 

4670 PLOT 576,h:DRAWR 58,0:DRAWR 

,47:DRAWR -58,0:DRAWR 0,48:DRAWR 5 

8,0:M0VER -4,-34:DRAWR ,45 : i==i 1 1 : 

NEXT: GOSUB 5400 

4680 PEN 7:L0CATE 1,23:PRINT "Pies 

sez J pour Jouer" :F'RINT " ou D p 

our la demo";:FOR i = 1 TO 25:a=INKE 

Y*:NEXT i 

4630 IF INKEY(45)=0 THEN RUN 290 

4700 IF INKEY<61)==0 THEN 4740 ELSE. 

4690 
4710 REM 

4720 REM »«■ PROCEDURE EXPLICATION 
S 

4730 REM 

4740 MODE 1.:PEN 1 
4750 PRINT "LE BUT DU JEUl 

t 
4760 PRINT "Votre mission est de t 
rouver 7 blocs "; 
4770 PRINT "d'uranium 232 enrichi. 

4780 PRINT "Ces blocs sont diapers 
es dans 10 sa I I as " ; 
4730 PRINT "souterraines. 

4800 PRINT "LE DEROULEMENT DU JEU: 

4810 PRINT "Votr-e quete sera f aci I 

itee par I 'he I ico "; 

4820 PRINT "dorsal que vous contro 

lez. "; 

4830 PRINT "Les dep I acements se fo 

nt a I 'aide des "; 

4840 PRINT "touches du curseur, a 

I 'exception de la "; 

4850 PRINT "fleche vers Ie bas.En 

ef f et, pour a I I er "; 

4860 PRINT "vers Ie bas, il suffit 

de cesser- tout " ; 
4870 PRINT "deplacement, I'helico 
descendr-a a I ors en"; 
4880 PRINT "douceur. 

4830 PRINT "LES DANGERS: 

4900 PRINT "Certains murs de briqu 

e sont plus c I airs"; 

4910 F'RINT "que les autres.Vous po 

uver les plasti- "; 

4920 PRINT "quer pour I iber-er Ie p 

assage. "; 

4330 PRINT "Pour se I ivr-er a cet a 

cte,il vous suffit"; 

4940 PRINT "de vous approcher- tr-es 

pres de ceux-ci "; 
4950 F'RINT "puis de presser la bar- 
re d' espacement , "; 
4960 PRINT "Mais les nombre de gre 
nades est limite. ";:FOR i = 1 TO 25 
:a=INKEY*:NEXT 
4370 IF INKEY*="" THEN 4370 
4980 PRINT: PRINT :PRINT: PRINT: PRINT 
: PRINT: PRINT: PRINT: PRINT: PRINT "D' 
autre part , certains murs sont radi 
o- "; 
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GOTO 1520 
: GOTO 1580 

GOTO 1640 
: GOTO 1690 



1220 CALL CHAR ( 132, "30302080702C203028F8 
A020000000000000000000000000000000000000 
O") 

1230 CALL CHAR (136, "30301 01 238D01O30507B 

1410000000000000000000000000000000000000 

O") 

1240 CALL CHAR (140, "606020B0682B2060A0B8 

8880000000000000000000000000000000000000 

00") 

1250 CALL CHAR ( 104, " 1C3E495D77E3FFBB0000 

0000000000000000000000000000000000000 " > 

1260 CALL CHAR (96. " 10387C7C3800000000000 

000000000000000000000000000000000000000" 

) 

1270 RETURN 

(280 CALL H :: 1=0 !: LEVEL=0 :: PP=0 :: 

TAF-0 :: SC=0 :: CALL COLOR <B. 9, 16) 
1290 ! JEU SUIVANT LES DIFFERENTS TABLEA 
UX 

1300 CALL H :: TAP=TAP+1 :: Pp=0 :: LEVE 
L=LEVEL+1 :: CALL K(LEVEL) 
1310 IF TAP>TA THEN TAP=1 
1320 CALL K (LEVEL) 

1330 MM=ME(TAP>:: NN=NE(TAP>:: M0(3)=JK( 
TAP):: NO (3) =KJ (TAP) : : MO (4) =JL (TAP) : : N 
D(4)=LJ(TAP) 

1340 ON TAP GOTO 1350,1350 
1350 FOR 1=2 TO 20 :: DISPLAY AT(I,1)SIZ 
E(27):AE*(I+(20)MTAP-1> ) ) : : NEXT I 
1360 CALL SPRITE(#1, 128, 16,MM.NN,#3, 104, 
9, MO (3) .NO (3), #4, 104. 11. MO (4) .NO (4) ) 
1370 11=2 

1380 CALL HCHAR (21, 1,33,64) 
1390 CALL KEY(0,K,S) 

1400 CALL GCHAR (INT (MM/8+3) , INT (NN/8+1) . 
LL):: IF LL=32 THEN 1B60 

1410 CALL GCHAR(INT(MM/B)+2. INT(NN/8)+2. 
A):: CALL GCHAR ( INT (MM/B) +2, INT (NN/8) +1 , 
PO)l! CALL GCHAR(INT(MM/8>+2. INT(NN/B) ,0 
) 

1420 IF (A=33 AND 0=33) AND PQO40 THEN 2 
150 

1430 IF K=82 THEN 1740 
1440 IF K=87 THEN 1770 
1450 IF K=ASC("Z")THEN 1790 
1460 IF K=ASC("C")THEN 1B30 



tW70 IF K=6B THEN X=4 : 
1480 IF K=83 THEN X=-4 
1B90 IF K=69 THEN X=4 : 
1B00 IF K=8B THEN X=-4 
1E10 IF S=0 THEN 18B0 

1B20 CALL GCHAR ( INT (MM/B+2) . INT (NN/B+2) , 
LL):: IF LL=33 THEN 1880 
1B30 CALL FH(SC) 
1640 CALL P (MM,NN,SC,PP) :: IF PP=10 THEN 

CALL DELSPRITE(ALL) :: GOTO 1300 
1S50 CALL L0CATE<#1,MM,NN+X) : : CALL PATT 
ERN(ttl,132> 

1560 CALL LOCATE (#1, MM. NN+X«2) : : NN=NN+X 
*2 :: CALL PATTERN (#1 , 128) 
1570 UY=116 :: 0P=4 :: GOTO 1B80 
1580 CALL. GCHAR (INT (MM/B+2), INT (NN/B) . LL 
) : : IF LL=33 THEN 18B0 
1590 CALL FH(SC) 

1600 CALL P(MM,NN-B,SC,PP) : : IF PP=10 TH 
EN CALL DELSPRITE(ALL) : : GOTO 1300 
1610 CALL LOCATE (#1, MM, NN+X) : : CALL PATT 
ERN(#1, 136) 

1620 CALL LOCATE (#1, MM, NN+X*2) : : NN=NN+X 
*2 : : CALL PATTERN (#1 , 140) 
1630 UY=112 :: OF --4 :: GOTO 1B80 
1640 CALL GCHAR ( INT (MM/B+1), INT (NN/B+1) . 
LL) : : IF LLO40 THEN 18B0 
1650 CALL FH(SC) 

1660 CALL L0CATE(#l.MM-X,NN-3>: : CALL PA 
TTERN(#1, 124) 

1670 CALL LOCATE (#1, MM-X*2. NN-3) : : MM=MM 
-X»2 :: CALL PATTERN (#1 , 120) 
16B0 GOTO 1880 

1690 CALL GCHAR < INT (MM/8+3) . INT (NN/B+1 ) , 
LL):: IF LLO40 THEN 18B0 
1700 CALL FH(SC) 

1710 CALL L0CATE(ttl,MM-X.NN-3> : 
TTERN(#1, 120) 

1720 CALL LOCATE (#1 , MM-X*2, NN-2 
PATTERN (#1, 124) : : MM=MM-X*2 
1730 GOTO 1880 

1740 CALL SPRITE(#6,96,7.MM+5,NN+10): : C 
ALL LOCATE (#6. MM+B. NN+10) : : CALL SOUND ( 1 
0,440,0):: CALL LOCATE (#6, MM+13, NN+10) 
1750 CALL HCHAR (INT (MM/B) +3, INT (NN/8) +2, 
32) 

1760 CALL DELSPRITE(#6) : : GOTO 1880 
1770 CALL SPRITE(#6,96,7,MM+5,NN-07) :: C 
ALL LOCATE (#6, MM+B, NN-07) : : CALL SOUND ( 1 
0,440,0):: CALL LOCATE (#6, MM+13, NN-07) 
17B0 CALL HCHAR(INT(MM/8)+3, INT (NN/8) ,32 
):: CALL DELSPR1TE <*6) : : GOTO 1B80 
1790 CALL GCHAR(INT(MM/B)+2, INT1NN/S) ,K1 
):: CALL GCHAR ( INT (MM/B) +2, INT (NN/8) -1 , K 



CALL PA 



CALL 



1800 IF Kl=33 OR K2=33 THEN 1880 
1810 CALL PATTERN (#1, 112):: CALL LOCATE! 
#l,MM-4,NN-4):: CALL LOCATE (#1 , MM-8, NN-8 
) 

1820 CALL L0CATE(#1,MM-4,NN-12) : : CALL L 
0CATE(#1,MM,NN-16) : : NN=NN-16 :: GOTO IB 
80 

1830 CALL GCHAR(INT(MM/8)+2, INT(NN/8)+2, 
K2):: CALL GCHAR ( INT (MM/B) +2, INT (NN/8) +3 
,K1) 

1B40 IF K2=33 OR Kl=33 THEN 18B0 
1B50 CALL PATTERN (#1, 116) : : CALL LOCATE! 
#l,MM-4,NN+4,(tl,MM-8,NN+8,«l,MM-4,NN+12. 
#1,MM,NN+16) :: NN=NN+16 :: GOTO 1880 
1B60 CALL PATTERN (ttl.UY) 

1870 CALL LOCATE (#1, MM+B. NN) :: MM=MM+B : 
: GOTO 1880 
1880 11=11+1 

1B90 CALL GCHAR(INT(M0(II)/8)+2, INT (NO (I 
I)/8)+l,KL):: IF KL=32 THEN 2030 
1900 IF KL=40 AND MOdlXMM THEN 2030 
1910 CALL GCHAR(INT(M0(II)/8).INT(N0(II) 
/8>+l,KL>:: IF KL-40 AND M0< 1 1 ) >MM+10 TH 
EN 2050 

1920 CALL GCHAR(INT(M0(II)/8+l). INT(NO(I 
I)/8)+2,KL) :: IF KL<>33 AND NOUIXNN TH 
EN 2080 

1730 CALL GCHAR(INT(M0(U)/8)+l, INT(NO(I 
I)/B).KL):: IF KL<>33 THEN 2110 
1940 101 (II)=IOI (II1+1 :: IF I0KIIX6 T 
HEN 2130 ELSE OUI=INT < 16*RND) +2 :: RY=IN 
T(INT(25*RND)+2) 

1950 CALL L0CATE(#II.0UI*B+1,RY»B+1) 
1960 M0(II)=0UI«8+1 :: NO ( 1 1 ) =RY*B+1 
1970 GOTO 2130 
1980 ! 

1990 ! DEPLACEMENT DES MONSTRES 
2000 ! 
2010 ! 
2020 ! 

2030 CALL LOCATE (#11, MO ( 1 1 ) +B, NO ( 1 1 ) ) : : 
MO(II)=MO(II)+B :: CALL COINC (#1 1 , #1 , 10, 
J2):: IF J2=-l THEN 2150 
2040 IOI(II>=0 :: GOTO 2130 
2050 CALL L0CATE(#II,MO(II)-8.NO(II) ) : : 
M0(II)=M0(II)-8 :: CALL COINC (#1 I , #1 , 10, 
J2>:: IF J2=-l THEN 2150 
2060 IOI(II)=0 :: GOTO 2130 
2070 ! 

2080 CALL L0CATE(#II,MO(II) ,N0(II)+8) : : 
N0(II)=N0(II)+8 :: CALL COINC (#1 I , #1 , 10. 
J2>:: IF J2=-l THEN 2150 
2090 IOI(II)=0 :: GOTO 2130 



4330 PRINT "actifs, I eur contact e 

st morte I . " ; 

5000 PRINT "On peut les r-econnaitr 

e f aci lenient car "; 

5010 PRINT "ils clignotent. 

5020 PRINT "Si ces murs sont blanc 

s,ils peuvent etre"; 

5030 PRINT "dynamite de la meme ma 

niere que les murs"; 

5040 PRINT "normaux. 

5050 PRINT "Les blocs d'uranium qu 

e vous recherchez "; 

5060 PRINT "sont rouges et ne c I ig 

notent pas. "; 

5070 PRINT "Pour- les collector, il 

suffit de les "; 
5080 PRINT "toucher. 

5030 F'RINT "Cette action vous rapp 

orter-a des points,"; 

5100 F'RINT "ainsi que de nouvel les 

bombes , pour "; 
5110 F'RINT "poursuivre voire explo 
ration. " 

5120 PRINT " Voici Ie 

s dix tableaux ...";:FOR i=1 TO 25 
:a=INKEY*:NEXT 

5130 IF INKEY*="" THEN 5130 ELSE F 
OR i=1 TO 26:PRINT:NEXT 
5140 REM 

5150 REM === PROCEDURE VISUALISATI 
ON 

5160 REM 

5170 RESTORE 1000:G0SUB 5280 
5180 RESTORE 1260:G0SUB 5280 
5130 RESTORE 1520:G0SUB 5280 
5200 RESTORE 1780: GOSUB 5280 
5210 RESTORE 2040:GOSUB 5280 
5220 RESTORE 2300: GOSUB 5280 
5230 RESTORE 2560: GOSUB 5280 
5240 RESTORE 2820:G0SUB 5280 
5250 RESTORE 3030: GOSUB 5280 
5260 RESTORE 3350:G0SUB 5280 
5270 GOTO 4520 

5280 MODE 0:WINDOW 81,1,20,3,25:60 
RDER 0: PAPER 0:PEN 1: SPEED INK 3,3 
:EVERY 10000,1 GOSUB 640:WINDOW SW 
AP 0,1: PAPER 7:CLS:F0R i=1 TO 23:R 
EAO b :FOR J=1 TO 20 

5290 a=MID*(b, J,1 ) : IF a==CHR*<32) T 
HEN F'RINT a; 

5300 IF a=="o" THEN PAPER 14:PEN 10 
: PR INT CHRSC255); : PAPER 0:PEN 1 
5310 IF a="x" THEN PAPER 11:PRINT 
" "; : PAPER 

5320 IF a="0" THEN PAPER 14:PEN 12 
: PR I NT CHR$<255); : PAPER 0:PEN 1 
5330 IF a="X" THEN PAPER 14:PEN 13 
: PR INT CHR*(255) ; : PAPER 0:PEN 1 
5340 IF a="z" THEN PAPER 7:PRINT " 

"; : PAPER 
5350 NEXT J,i 
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2100 ! 

2110 CALL LOCATE(*II,MO(II) ,N0(II)-8>: : 

N0(II)=»NO(II)-8 :: CALL COINC (#1 1 , #1 , 10. 

K2>:: IF K2—1 THEN 2150 

2120 101 (II)=0 

2130 IF 11=4 THEN 11=2 

2140 GOTO 1390 

2150 MEN=MEN-1 

2160 DISPLAY AT (23, 17) SI ZE (2) : MEN 

2170 CALL DELSPRITE(ALL) : : IF MEN=0 THEN 

2190 
2180 PP=0 : : GOTO 1320 

2190 DISPLAY AT ( 10, 1 1 ) SI ZE ( 10) : "GAME OVE 
R" :: FOR P3=l TO 600 :: NEXT P3 
2200 SC=0 : : FOR TYT=2 TO 20 : : CALL HCH 
AR(TYT,3,32,27):: NEXT TYT 
2210 CALL CDL0R(8,7, 1) : : CALL C0L0R(0,9. 
1):: DISPLAY AT ( 10, 7) SIZE (20) : "LA PARTIE 

EST FINIE" 
2220 DISPLAY AT ( 1 1 , 7) SI ZE ( 19) : "VOULEZ VO 
US REJOUER" 

2230 ACCEPT AT < 14, 10) VALIDATE ( "OUIN" ) BEE 
P SIZE(3):C» :: IF SEG* <C», 1 , 1 ) ="0" THEN 

1280 ELSE CALL CLEAR :: END 
2240 SUB P(MM,NN,SC,PP) 

2250 CALL GCHAR ( INT (MM/B+2) , INT (NN/8+1 ) . 
LL):: CALL GCHAR ( INT (MM/B) +2, INT (NN/8) +2 
,KJH) 

2251 IF LL=88 THEN 2260 

2252 IF KJH=8B THEN 2253 ELSE SUBEXIT 

2253 CALL HCHAR ( INT (MM/B) +2. INT (NN/8) +2, 
32):: SC=SC+150 

2254 GOTO 2270 

2260 CALL HCHAR ( INT (MM/B+2) . INT (NN/8+1 ) . 

32):: CALL SOUND (20, 292.0) : : SC=SC+150 

2270 DISPLAY AT (23, 6) SIZE (6) :SC 

22B0 PP=PP+1 : : SUBEND 

2290 SUB FH(SC) 

2300 SC=SC+5 :: DISPLAY AT (23, 6) SI ZE (6) : 

SC 

2310 SUBEND 

2320 SUB K (LEVEL) 

2330 FOR K=2 TO 20 :: CALL HCHAR (K, 3. 32. 

27) : : NEXT K 

2340 DISPLAY AT ( 10, 1 1 > SI ZE ( 12) : "LEVEL "8i 

STRt(LEVEL) : : DISPLAY AT (23, 27) SIZE (2) : L 

EVEL 

2350 FOR TTY=1 TO 200 :: NEXT TTY 

2360 SUBEND 

2370 SUB H 

2380 FOR 1=2 TO 20 :: CALL HCHAR ( I , 3, 32, 

27) : : NEXT I 

2390 SUBEND 
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SUPER HOT 

Profitez de quelques missions offensives en territoire 
adverse, pour vous initier "sur le vif" au pilotage d'un 
helicoptere... 

Eric LECHAUDEL 



SUITE DU 
N°130 



718 NEXT J 

719 NEXT I 
788 LET F»(X,Y) ■"■" 

721 LET X0» (Y-20) *500 

722 LET Y0= (20-X) *500 

725 LET F$(X-1,Y)="H" 

726 LET F*(X + 1,Y) »"0" 
738 LET X»INT (RND*4©)+1 
74.0 IF F$(X) <>" 

0T0 730 

750 LET F«(X)»" 

~760 FOR 1=1 TO 40 

770 FOR J.l TO 4.0 j-ki „„ Tm 

780 IF P»(I,J)<>" THEN GOTO 8 

50 

790 IF RND<.25 THEN LET Fid, J) 



THEN G 



-) l- 



795 IF RND>.75 THEN LET F»(I,J) 

*800 IF F$(I,J)»" " THEN LET F«< 

I.J) -"■" 

850 NEXT J 

860 NEXT I 

865 LET F» (20,20) «"H" 

870 SLOU 

330 RETURN 

900 LET X -20+ INT (XR/500) 

901 LET BT»0 

902 LET TK-0 

90S LET Y-20-INT (YR/500) 
907 FOR F.-l TO 1 _ _„ 

910 IF DK500 OR X<2 OR X>38 TH 
EN GOTO 917 

915 IF Y+F>0 RNO Y+F<41 THEN LE 
T 0*=F$(Y+F,X-1 TO X + l) 

916 PRINT RT 5+F,28;0» 

917 NEXT F 

919 IF X>0 AND X<41 AND Y>0 AND 
Y<41 THEN LET Q*.F»(Y,X> 

920 IF Q*o"fi)" RND CODE Q»>156 
THEN LET RMI=(CODE Q«-156)«100 

925 IF 0*«"B" THEN LET RMI-50 
930 IF AL<AMI THEN GOTO 8500 
94.0 IF Q* = "»" OR a*-"-" THEN GO 

TO 9,99 
950 RETURN 
999 LET BT«0 

1000 IF RND < .96 THEN GOTO 950 

1002 IF Q* = "l" THEN LET TK»1 

1003 IF j * " - " TMENLET BT » 1 

1005 LET E * =EI(BT ™ ?T0 ™»7 17 ) 

1006 FOR T.l TO 10 
PRINT RT 20, 

'.; E*,TA8 0; " 



1003 IF INKEY$="T" THEN GOTO 150 

1009 PRINT RT 20,0; U$ 

1010 NEXT T 
1020 GOSUB 8400 
1030 RETURN 
1500 G03UB 4000 
1510 RETURN 

PRINT RT 



3£ 



2005 GOTO 2010 

2006 PRINT RT 20,0; U 

2007 PRINT RT 20,0; "I 

2010 INPUT PR _ ,„ 

2020 IF PR<1 OR PR>599 OR PRO IN 
T PR THEN GOTO 2006 
2030 LET NcPR 
204.0 LET 0K=2 
2050 G03UB 8900 
2060 PRINT RT 18,12;YJ 
370 PRINT RT 20,0j." 



2080"IF INKEY*«"N" THEN GOTO 270 



2090 IF INKEY*<>"0" THEN GOTO 20 

80 

30 PRINT RT 



250!: 



GOTO 2510 

PRINT RT 20,0;U*;RT 20,0; 



2510 INPUT PO 

2520 IF P0<1 OR PQ>1199 OR PO < 

NT PO THEN GOTO 2506 

2525 IF PQ=PA*2 THEN LET CG = 1 

2530 LET N = PQ 

2540 LET 0K=3 




PAS l£ HOWZs 




2550 GOSUB 8900 

2560 PRINT RT 12,19;Y$ 

2700 PRINT RT 20,0; U$ 

2701 GOTO 6000 
2710 IF PQ/PA*2 THEN RETU 
2720 PRINT RT 



2730 LET PM-PO/2 

2740 IF PM/PA<1 THEN LET CA=CA+3 

60-iPM/PR*360) 

2750 IF PM/PR>1 THEN LET Cfi=CA-3 

60+ <PA/PM*360) 

£751 IF CA>=360 THEN LET CR=Cfi-3 

60 

2752 IF CR<0 THEN LET CA=360+CA 

2753 LET OK =2 

2755 LET N=INT CR 

2756 GOSUB 8900 

2757 PRINT RT 11, 2; Y* 

2810 LET CG=1+ABS (PM-PA) /25 
2820 IF COS THEN GOTO 290O 
2825 PRINT RT 20 , 27, "91" i INT CG 
2330 RETURN 
300PRINX 'BT 20,0; 




3020 IF IR<0 OR Ifl>30 THEN GOTO 

3006 

3030 PRINT RT 16,25; INT Ifl; "■" 

3040 GOTO 2700 




3515 IF RT<0 OR RT>30 THEN GOTO 

3506 

3520 LET AG=0 

3525 LET RD«0 

3527 PRINT RT 20,0; Ut 

3530 IF RT»0 THEN GO TO 3650 

3J53^PRINT RT 20 , ; ~ 

354-5 IF T» = "D" THEN LET RD«RT 

3550 IF T$*"G" THEN LET RGsRT 

3560 IF T»o"D" RND T«O"0" THEN 

GOTO 3540 

3570 LET OK el 

3580 LET N«RT 

3590 GOSUB 8900 

3600 PRINT RT 16,13;Y»; 

3610 IF RG THEN PRINT 

3620 IF RD THEN PRINT 

3630 GOTO 2700 

3650 PRINT RT 16,13; 

3660 LET SM=CA 

3670 GOTO 2700 

4000 LET X* = "" 

4001 PRINT RT 0,0; "■ 



32) 

( Xfl/500) 
(YR/500) 



'E UI 
THEN LE 



4003 PRINT AT 1,0; 

4005 FOR 1=1 TO 8 

4006 PRINT 'J 

4007 NEXT I 

4008 PRINT U*( TO 

4009 LET X=20+INT 

4010 LET Y.20-INT 

4011 LET Q*="-" 
4015 IF X>1 AND X<41 AND Y>1 AND 

X<41 THEN LET 0»«F»(Y,> 

4022 IF 0«="i" THEN LET 
LLE" 

4023 IF Q*=") " OR 0* = " (' 
T X*»" PONT" 
4-024 IF NOT BRD AND DK100 THEN 
LET X$ = " OG" 

4025 IF TK THEN LET X* = " TANK" 

4026 IF BT THEN LET X$»" BATEAU" 

4027 IF X$<>"" THEN GOTO 4040 

4035 PRINT RT 3,1;" CENTRE DE 
CONTROLE fl";TRB 1; " SUPER-HO 
T:RIEN A SIGNALER" I TAB 1;" NE GA 
CHEZ PAS WS MISSILES ";TA6 li " 
AUCUN HOUVEMENT ENNEMI SIGN ALE" 

4036 PAUSE 200 

4037 GOTO 4910 

4040 PRINT AT 3,1; "CENTRE DE CON 
TROLE R SUPER-";TAB 1;"H0T.U0US 
AUEZ UN";X*;" DEUANT";TAB U "UOU 
S. . ." 

4041 GOSUB 4990 

4042 IF NOT TK AND NOT BT THEN L 
ET F$(Y,X) ■"I" 

4047 LET MISsMIS-1 



4043 IF TK THEN LET TAN=TAN+1 

4049 IF BT THEN LET BAT=BAT + 1 

4050 IF X$ = " OC" THEN GOTO 4600 

4052 IF Fi(Y,X)»")" THEN LET F» ( 
Y,X TO X + l) «"--" 

4053 IF F$(Y,X)="(" THEN LET F$( 
Y,X-1 TO X) = " — " 

4054 IF Q*="i" THEN LET UIL=ylL + 
1 

4103 IF CODE F»(Y,X) >=123 THEN L 
ET F*(Y,X) = "»" 

4104 LET MIS=MIS-1 
4160 PAUSE 5 

4165 PAUSE 5 

4166 PAUSE 5 
4500 GOTO 4910 
4510 PAUSE 500 
4600 LET BAD = 1 
4610 LET XO=0 
4620 LET YO=0 
4630 GOTO 4103 

4910 CLS 

4911 GOSUB 9035 

4912 LET OK =2 

4913 LET N=Pfl 

4914 GOSUB 8900 

4915 PRINT AT 12,12;Y$ 

4916 LET OK =3 

4917 LET N=PO 
4913 GOSUB 8900 

4919 PRINT RT 12,19;Y$ 

4920 IF RG THEN LET N=AG 

4921 IF RD THEN LET N=AD 

4922 PRINT AT 16,13; "00" 

4923 LET 0K«1 

4924 if ag or ad then gosub 8900 

4925 if ag or rd then print at 1 
6,13;y»; 

4926 IF RG THEN PRINT " MJllMild " 

4927 IF RD THEN PPINT [JgMtJd 

4928 PRINT AT 16,25; INT IA, "■" 

4930 LET OK =2 

4931 LET N=INT CA 

4932 GOSUB 8900 

4933 PRINT AT 11, 2; Y* 

4934 GOTO 6000 

4990 FOR T = l TO 10 

4991 PPINT RT SB . 1 .- " ifehM^d " 

4992 LET QWERTY =0 

4993 PRINT AT 20 , 12; "TARGET" 

4994 LET QUERTY=N0T OUERTY 

4995 NEXT T 

4996 PRINT RT 



"■B»**iW 

4997 RETURN 

5000 LET DI=S©R (XA*XA+YA*YA) 

5001 IF DI>100 THEN GOTO 5040 
5005 PRI NT RT 20,0;" 



5500 LET N=AMI 
8501 LET OK =3 
3502 GOSUB 8900 
8505 FOR 1=1 TO 
8510 PRINT RT 3, 





h p c co mf ii ■ : a I ' e ; 

. ET LA MISSION 



5030 GOTO 5050 

5JL40 PRINT RT 20,0, ' 

5050 FOR H=l TO 100 
5060 NEXT H 

5070 CLS 

5071 PRINT "UOUS A'JIEZ DETRUIT:" 

5072 IF BAD THEN PRINT "LE OG" 

5073 IF PON THEN PRINT "LE PONT" 
5075 PRINT "UILLES: " ;UIL, .."BATEfl 
UX : " , BRT , , "TANKS ; " ; 1 "^^^^ 

SBMIFTNKEYjJx^H E N RUN 
5100 IF INKEY$="" THEN GOTO 5090 
5110 STOP 

~- _PRINT RT 20,0; "I 



5540 
890C 
8910 
8920 
8930 
8940 
9000 
9002 
9003 
9004 
9005 
9006 
9007 
9003 
9009 
9010 
9011 
9012 
9013 
9014 
9015 
9016 
9017 
9018 
9019 
9020 
9021 
9022 
9023 
9023 
9029 
9030 
9031 
9032 
9034 
9035 
IT 10 
9036 
9037 
9038 
90 3 R 
9040 
+C*( 
9041 
+ "1" 
904.3 

A*; " 

90*5 

$ 

9046 

4; "M 

9047 

* 

9048 

1" +D 

9049 

1 TO 

9050 

90S1 



GOTO 5050 

LET Y*=STR$ INT N 

FOR I=LEN Y* TO OK 

LET Y* = "0"+Y* 

NEXT I 

RETURN 

LET RMI=0 

LET BAT=0 

LET UIL=0 

LET TRN=0 

LET MIS=6 

LET BAD=0 

LET MIS=1 

FAST 

GOSUB 700 

LET SM=90 

LET AL=0 

LET PO»0 

LET Ufl=0 

LET PO=600 

LET PA=300 

LET IA=0 

LET AG=0 

LET AD=0 

LET UI»0 

LET MI=0 

LET FU=200 

LET CA=0 

LET D I =50000 

LET Xfl=0 

LET YA=0 

CLS 

LET CG=1 

GOSUB 9035 

GOTO 9071 

PRINT AT 0,1; "RADARS DE POS 
N P/R OBJECTIF" 

LET A* = " | |" 

LET B* = " I I " 

LET D$ = "^^^_" 

LET Ct»"^^^" 

PRINT AT 1, 1; C*+C*+C$+C$+C* 
1) 

PRINT AT 2,0;"|"+C*(1 TO 5) 
:TAB 8;"ALTI";TRB 14;"."+D» 

PRINT TAB 0:fl$;TAB 12; "M 

DIST " " ,";D*(1 TO 3) ; ", " 

PRINT A$;TAB 14;fl*;TAB 27;B 



PRINT A$; " PORT 

;TRB 27; B$ 

PRINT R*,TAB 14;fl$,TA6 2 



A*;TAB 2 

B 



PRINT R»;TA6 14:A»;TAB 27;" 
* (1 TO 3) +"| " 
PRINT "■"+C*,TH6 14;"|"+D»( 
5) +"j",TAB 23; "UAR" 
PRINT TAB 25; " M/S" 
PRINT " CRP";TAB 14; "ROTOR 



5501 GOTO 5050 

6000 GOSUB 62 

6001 IF NOT DE AND PO>50 THEN LE 
T DE = 1 

6010 GOSUB 90 

6020 RETURN 

7000 PRINT RT 20,0; 



9052 PRINT RT 11,14;C*;TRB 27; "F 
UEL" 

9053 PRINT TRB 3; 
;TRB 17; "0: " ; TAB 
905* PRINT TAB 3 
RS/MINUTE" 

9055 PRINT TAB 3 

9056 PRINT "0^-+ 
ROTOR (DEG)" 

9057 PRINT TAB 3 
" ;TAB 22: "AU; " 

9058 PRINT TRB 3 
",TRB 23; " (2) " 

9059 PRINT TRB 3 
TAB 9; "UITESSE- 
9069 LET K=USP 16514 
"070 RETURN 

071 LET U 



"N" 
31 1 


;TAB 

'L" 
.TAB 


10 

11; 


"P: " 
"TOU 


-E 


INCI 


t 

.INf 


• 
ISON 




TAB 


9; ■ 


G/D: 




.TAB 


13, 


" (1) 


"S" 
KM 


.TAB 
/H" 


28, 


"H"; 




8405 LET UD=AG+HD 
6410 FOR H=l TO 2 
8411 IF H=2 THEN PRINT RT 3,3; "■ 

8414 PRINT RT 2+H,3;"i" 

8415 FOR T=l TO 3 

8416 IF INKEY*»"1" THEN GOTO 844 

8417 NEXT T 

8419 NEXT H 

8420 PRINT AT 4, 
3421 PRINT RT 5,3; "L 

8425 PRINT RT 20,0; US 

8426 GOTO 6450 

8447 GOSUB 3500 

8448 IF UD=RG+RD THEN GOTO 8450 



*ac 



9072 SLOU 

9075 PRINT RT 20,10;' 

9076 FOR 1=1 TO 30 

9077 NEXT I 
907* GOTO 9100 

9100 PRINT AT 3,8; "0000", AT 4,22 
;"NNNN";AT 9,23, "000"; AT 11,2;"0 
00"; AT 16, 13; "00"; TAB 25; "00"; AT 
19,17; "000" 

9108 PRINT RT 12 ,27; "200" 

9109 PRINT AT 12 , 12 : "300" ; TAB 19 
; "0600" ; AT 6.9; "50" 

9130 RETURN 

9955 SRUE " SUPER -HOB" 

9956 RUN 



ORICIf 



10057 


DATA 


BD , A9 


10058 


DATA 


043E 


10059 


DATA 


A9,4F 


10060 


DATA 


0429 


lOOil 


DATA 


5D,ED 


10062 


DATA 


045D 


10063 


DATA 


46,85 


10064 


DATA 


02E5 


1D065 


DATA 


45,07 


10066 


DATA 


01E9 


10067 


DATA 


07, AD 


10068 


DATA 


01DE 


10069 


DATA 


51,85 


10070 


DATA 


020A 


10071 


DATA 


04, A9 


10072 


DATA 


0295 


10073 


DATA 


20,03 


10074 


DATA 


0227 


1DD75 


DATA 


08, OA 


10076 


DATA 


0276 


10G77 


DATA 


05, E8 


10078 


DATA 


0495 


10079 


DATA 


BD.A2 


10080 


DATA 


0392 



Suite de la page 10 

,4F,8D,5D,BD,D0,0F 
,BD,5C,BD,A9,55,BD 
,A9,49,BD,5E,BD,A9 
,07,A9,BD,B5,0a,20 
,20,03,04, A9, 48, 85 
,52, 08, 20, 03, 04, A9 
,07, AD, 55, 08, 20, 03 
,53, 85, 07, AD, 54, 08 
,04, A2,42, 18, AD, 57 
,B0,05,0A,B0,05,F0 
,D0,02,E8,E8,8E,7B 
,00,20,30,E6,F0,0D 



10081 


DATA 


9D, ID, 


(H)i 


FH, 


FO, 


1 1 , 


Dn 


F3 


10109 


DATA 


78, ED 


C9 


42, 


FO, 


12 


C9 


43 


10137 


DATA 


OB 


.FO 


IB 


10082 


DATA 


0513 














10110 


DATA 


044E 














10138 


DATA 


037A 




100B3 


DATA 


20,30, 


E6, 


DO 


FB, 


86, 


03 


A9 


10111 


DATA 


F0,07 


A 2 


33 


AO 


OS 


4C 


94 


10139 


DATA 


DO 


,UC 


bb 


10084 


DATA 


0433 














10112 


DATA 


0354 














10140 


DATA 


04 92 




10085 


DATA 


20, 9D, 


in, 


BD 


EBi 


EO, 


17, 


DO 


10113 


DATA 


05 , A2 


,38 


AU 


08 


4C 


94 


05 


10141 


DATA 


30 


b.6 


DO 


10086 


DATA 


0446 














10114 


DATA 


026C 














10142 


DATA 


04AB 




10087 


DATA 


F6,A9 


f-,0 


B3 


05 


A9 


08 


85 


101 15 


DATA 


A2,45 


AO, 


08 


B6 


ia 


84 


06 


10143 


DATA 


4C 


58 


06 


10088 


DATA 


03BF 














10116 


DATA 


02A4 














10144 


DATA 


0283 




10089 


DATA 


06, IB 


AD 


5 4 


OS 


CD 


5 2 


08 


10117 


DATA 


A0,00 


Bl 


05 


C9 


2E 


!■ 


06 


10145 


DATA 


02 


B5 


OA 


10090 


DATA 


026E 














10118 


DATA 


0343 














10146 


DATA 


02DD 




10091 


DATA 


85,09 


85 


m 


F.6 


09 


E6 


01 


10119 


DATA 


99,73 


BD 


C8 


DO 


[ t 


60 


A9 


10147 


DATA 


BD 


85 


08 


10092 


DATA 


02EA 














10120 


DATA 


0563 














10148 


DATA 


0220 




10093 


DATA 


AD, 55 


08 


ED 


53 


08 


85 


OA 


10121 


DATA 


01, B5 


00 


A9 


OC 


80 


bb 


BE 


10149 


DATA 


A9 


60 


B5 


10094 


DATA 


02E1 














10122 


DATA 


02DB 














10150 


DATA 


02 


:f 




10095 


DATA 


85,02 


\z6 


OA 


E6 


02 


A9 


6E 


10123 


DATA 


A9,52 


BD 


n 


Bt 


AV 


OS 


BD 


10151 


DATA 


20 


27 


04 


10096 


DATA 


0376 














10124 


DATA 


03F5 














10152 


DATA 


02A1 




10097 


DATA 


85 , 07 


A9 


00 


B3 


00 


A5 


OA 


10125 


DATA 


70, BE 


2U 


CA 


L6 


20 


96 


ho 


10153 


DATA 


2D 


20 


36 


10098 


DATA 


0269 














10126 


DATA 


049A 














10154 


DATA 


0316 




10099 


DATA 


20,03 


DA 


20 


27 


04 


C6 


09 


10127 


DATA 


20 , 30 


b.6 


cv 


24 


w 


hV 


A9 


10155 


DATA 


20 


27 


04 


10100 


DATA 


0141 














10128 


DATA 


0495 














10156 


DATA 


02A1 




10101 


DATA 


D0,F9 


20 


27 


4 


C6 


09 


Cfc 


10129 


DATA 


4C8D 


71 


Bk 


A I 


09 


20 


27 


10157 


DATA 


ID 


20 


36 


10102 


DATA 


03A9 














10130 


DATA 


02FA 














10158 


DATA 


02 


6 




10103 


DATA 


0A,A5 


OA 


20 


□3 


04 


A5 


DA 


10131 


DATA 


04, BD 


50 


U8 


C5 


DE 


DU 


05 


10159 


DATA 


A5 


OA 


20 


10104 


DATA 


01BF 














10132 


DATA 


02BE 














10160 


DATA 


0255 




10105 


DATA 


D0.E9 


20 


07 


E8 


A9 


08 


,8D 


10133 


DATA 


CA.DO 


1=3 


MJ 


Ub 


AU 


-41 


4C 


10161 


DATA 


D7 


A7 


20 


10106 


DATA 


0406 














10134 


DATA 


049F 
























10107 


DATA 


05 , BE 


A7 


20 


BD 


i IE 


BE 


AD 


10135 


DATA 


58,06 


A2 


00 


20 


2/ 


U4 


A 5 








A 


C 


10108 


DATA 


03A2 














10136 


DATA 


01F0 




















A 


9 



ED, 1D,BD,C5,0B 
EO, 11, DO, ED, 20 
FE,F0,05,A0,32 
A5,01,B5,09,A5 
A9,6E,B5,07,A9 
A5,0A,20,03,04 
05, A9, 08, 85, 06 
Bl,05, C5,0E,D0 
04,C6,09,D0,F0 
B1,05,C5,0B,D0 
04,C6,09,C6,0A 
03,04, A5,0A, DO 
BD,71,EE,A9,0B 
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WILTOR 



Dans le but insense de derober les diamants qui conferent 
de puissants pouvoirs au sorcier WILTOR, affrontez coura- 
geusement les creatures et les pieges de son sinistre 
domaine. 

Emerich FERNANDES 



towtU vck 
.rot i y\ 



COMMODORE 64 



SUITE DU 

N°130 



20000 P0KE53265, PEEK ( 53263 )f)ND239 : 

PRINT" nw aaaaaaaaaaaaaaaaaaaeaaaaa 
rarafsraiae " 

2090 1 pr i ht " aaaiuvux viaaaaaaie t vu 
■aaeaifTTvxfcvieaa" 

20005 PRINT" WTTOI &>@<*W<><'4<><i<a<i<inf*ntin 

20010 PRINT" SKLMNOKLMNOKLMHOKLriNOK 

LMHOKLMNO" 

20020 PRINT"SP Q PS P 

0" 

20030 F0RI=1T03 

20040 PR I HT " 3WMKHU J J J J J J J J J J J J J JJ 
JJJ.TJ.TJJJJJJJJ" 
20050 NEXT 

20060 PR I NT " aWOTLU JJJJJJ J J J J JJ JJ J 
JJJJJJJJJJJJJfl" 

20070 pRINT"«IH«[!!I(IBI!WlW!WiaBCDTIiF"II 
IWJKTT T S(S JO 1 BlBCmiFffll 

m a 

20080 PRINT"JIKII!lHSr»IBCD"MF'W r JiEF 

GMKMPBWRRn* S S "; 

20090 PRIH^nFCICWrWTMEFGHMWH 

«jt smBdniFiFniEFGwams" 

20100 PRINT"MHSS*IBS S SttCiniFn 

ip^EFc:«ro»i»5iv)(RRRR r 'iJ tpItibcb-mf 

THR-llEFO" 

20110 PRIHT"M««!!nil!WiaTr!nBCD'WFTIP 

^EFG:owimkR:"i«sriM«MiBCD''JiF r iF 

iiEForaar .; 

20 1. 20 pr i NT" «i■■^^lElCD^■F^F^l■EFG 

BOMBS" 

20 130 FOR I = 1 054TO20 1 4STEP40 : POKE I , 

128 : POKEI+54272, i NEXT 

20 1 40 FOR I = 1 055TO20 1 5STEP40 ■ POKE I , 

1 2? : POKE 1+54272, : NEXT 

20 1 50 SS=0 •■ TT= 1 2 : P0KE53265 , PEEK ( 53 

26550R16: RETURN 

?0000 FOR I ■ 1 TO 1 32 ! REflDfi CI): NEXT : PO 

KE53265 , PEEK < 53265 ) RND239 

30010 DRTR5,2,2,2,?,2,9,2,9, 2. 2, 8, 



4..! 



>,i . 1 .; 



":0O20 BRTR5..2,?, 



■ C .' C .' 

• 2,5 




30030 DRTR5,7,2, 1 , 1 , 1 .. 2 ■ 2 . 7, 2 . 3 . 2, 

2 . ,-. . f, . f., 2 . 7 . 2 ■ 6, 2, 9 ■ 2 ■ 4, 2 . 8 . 1 , 1 . 1 . 



30040 DRTR2 ■ 2 • 2 ■ 2 • i 



•2, 6. 6, 6, 

.2,2,2.2.. 



30050 POKEV+21 . 255 : POKFV+39 • 1 : POKE 

V .128: P0KEV+1 .221 : POKE2040 . 240 : P=l 

12 

:?006O F0RI=V+3T0V+11 STEP2 ■ POKE 1 , : 

NEXT 

30100 print " ^Bsneeaaafjiaperaapprciaaai? 

d@@aa@aaaaaa " 

30 1 1 PRINT " MSBEHLIVMXVSiaeieieiE c vu 

siaeeef fr 1 1 vxf i vsiaaa " 

30120 PRINT" aWHBl«?@@@@i3@@ai?@@@i<!@a@ 

r?>}«iaaaaaaaaa@ " 

30 1 39 ~PR INT " SKLIWOKLMNOKLMNOKLMNOK 
LMNOKLMNO" 

30140 PRINT" 5P PC P 
Q" 

30150 FORI=lTn? 

30 1 60 PR I HT " STOBIBBT.T J J J J.J.J J J J J J J J J 

JJJJJJ J J JJJJJJ" 

30170 NEXT : POKE53280 ,11: P0KE5328 1 , 



30 1 80 PR I NT " 3KMMWIJ J J J J J J J J J J J JJ J J J 

JJJJJJJJJJJJJH" 

30 1 90 FOR I = 1 054TO20 1 4STEP40 : POKE I , 

128 : POKE I +54272, 1 1 : NEXT 

30200 FOR I = 1 055TO20 1 5STEP40 : POKE I , 

128JP0KEI+54272,11 ■ NEXT :PRINT"«MHI! 

KOQKnDQ" i 

30210 pr i nt " iMBarMHn ro jBjHjgMgy -M 
nrnnmva\vmnmim\mr t 1 1 1 1 1 1 «k-h 

■itmitmit " • 

30220 PRINT"TTT»KIT»rr»KI rWB ggCDT l 

iip-iiR'Tn»w(n*ii KK-mrrnirmrr: 1 1 i»i 

(BIB" 

30230 pr i ht " snmnawBssikR»Rr»nrKnB 

CDTMF^F^EFGIKWrei^RKV-JaHTMi'T 

mrTTW-ir ; 




vV£ 9BCOH0B 

HA1TB , 




3 0240 rVIHT " IITmi rai r "1IJUI T (1ITHI mi 

r 1 1 1 1 1 1 1 1 f ■nsmssmcmRmi ur 

30250 PRIHT"3WHHI!MSI»I rjfBflBCmn 

iFfirmiEFf3««ni<»kPPH , -ii*-;»nkP"»i»i*i 
ijth brs" 

30260 PRINT" a>IMITI«IE»nkRRR1l>»l 

iii»»npr:nnR-iFniEFG»i««q*5" 

30270 POKEV+38, 1 1 : POKEV+41 , 4 : POKEV 

+42,4 

30280 SS=0 : TT=17 : P0KE53265, PEEKf 53 

265)OR16:GOSUB8500 

30290 POKEV+2 1 , 255 : POKEV+ 1 2 , 40 : POK 

EV+13,200:POKEV+14, 167 : POKE V+15, 12 

2 

30300 POKEV+29 , : POKE2046 , 244 : POKE 

2047, 244 : POKEV+23, 192 : GOTO400 

40000 FOR I ■ 1 TO 1 32 : REHDH < I ) : NEXT 

40010 DRTR5, 1,2,4,7,9,2,2,2,7,4,2, 

2,1,1,1,2,1,1,1,2,2,4,7,2,2,2,7,4, 

7,1,5 

40020 DRTR5, 2, 2, 3, 2, 9, 7,4,7,2, 3,2, 

2,2,2,2,2,2,2,2,2,2,3,2,7,4,7,9,3, 

2,2,5 

40030 DRTR5,1,2,7,7,7,2,3,2,7,9,7, 

7,6,6,6,4,6,6,6,7,7,7,7,2,3,2,9,7, 

2,1,5,5 

40040 BRTR2,2,2,7,7,7,6,6,6,7,2,7. 

2,2,2,3,2,6,6,2,7,7,2,7,2,2,7,2,2, 

5,5,5,5,5,5 

40050 POKE V+2 1 , 255 : POKE V+39 , 1 I POKE 

V , 1 28 : POKEV+ 1 , 22 1 : POKE2040 , 240 : P= 1 

12 

40060 FOR I = V+3T0V+ 1 1 STEP2 : PflKE 1,0: 

NEXT 

40 1 00 PR I HT " nW 9»t!<>nm<!<»<m<»<><»<*<><»<!8 

aaaaaaaaaaaa" 

4B110 pr i ht " smbqujvwx vaaaaaaaiiz c vu 

■aaaaiM vxf t viaaa " 

40120 pr i ht" mm waaaaaaaaaaaaaaaa 
aaaaaaaaaaaaa " 

40 1 30 PR I HT " *TLriHOKLMHOKLI1NOKLnHOK 

LnHOKLIIHO" 

40140 PRIHT"8P Q P I) P 

Q Q" 

40150 F0RI«1T03 

40160 PRIHT" 3CnWH«lJJJJJJJJJJ.TJJJJJ 
JJJJJJJJJJJJJJ" 



401^0 HEXT:POKE53280,0:POKE53231, 1 

1 

40 1 30 PR I HT " aMMMJJ J J J J J J J J J J J J J J J 

JJJJJJJJJJJJJII" 

40 1 90 FOR I = 1 054TO20 1 4STEP40 : POKE I , 

1 28 ! POKE I +54272 , •' HEXT 

40200 FOR I = 1 055TO20 1 5STEP40 : POKE I ■ 

123 : POKE I +54272, : HEXT PRIHT "JTOBIBI 

XIBBB" ; 

40210 print" an -mmm+ntnumnim 

TMinaiTMIfMir 1 1 1 1 1 1 1 1 EBarmFCifn 
IF^FMHBO" : 

40220 priht" gMnsmn • rwwsw 

CB"liF~MF^F''llI»M»W»IWMSl(| " 
40230 PR I HT " amWWTBCmiFIF'IiEFG 

wwr-« ; .iF'rrniF-irrnFFGW««ii»iii 
npUFCini" ; 

40240 PRINT" *F: IF. MEFG)«9WSMSrBC 

D'1IF'1F'llEFGRIQ>IllllB<-:ii|ITHIIT«ll'tlll 

tMntMiiMiir 

40250 priht" am r»«ss?iBCiniinw 

^lEFGWra*B«^MIT)nitMirTTn*;Si«PP 

RtRRRH*' : 

40260 PR I HT " SBSSSBBCITlBFirWniiEFG 

mwiT-m " 

40270 PR I HT " )B«R»WMSSSMH?RR"«SIIS»tl 

^E:l::rn■F^F^■EFGWIIma?R^l^ : :8«5»»r : . 

40290 POKEV+38 , : POKE V+4 1 , 1 2 ■ POKE V 

+42,12 

40300 PR I NT " WWW — — * TRB ( 1 3 ) " ST1 

• I — nmui i-. 'HiiiiFi minni 

403 10 POKE V+ 12,81: POKE V+ 1 4 , 1 67 i POK 
E V+ 1 3 , 1 30 : POKE V+ 15, 138 : POKE2046 , 24 
5 

40320 POKE2047 , 246 ■ POKEV+29 , 1 92 : PO 
KEV+27, 62 : POKEV+21 , 255 : POKEV+23, 
40400 SS=0 : TT=29 : GOSUB3500 : GOTO400 
50000 FOR I = 1 TO203 : P0KE5328 1,1: POKE 
V+37, I : NEXT : P0KE54276, 129 
50010 PRINT" <WH)U I MIimW W lll "TRB<13)"an 
mill! KHIII 



50020 POKEV+2 1 , 63 : FOR I = 1 T0255 : POKE 
54273, I : P0KE54296, I HEXT : GOTO 130 



ORIC 



' Suite de to page 25 

5165 FORI=1T03:CURSET105, 110, 1:CI 
RCLE5 + I, WCURSET103+I, 109, 1 :DRAWO, 
-10, l:NEXT 

5170 CURSET200, 100, l:DRAW-20,0, 1: 
DRAW0.-10, l:DRAW20,0, HDRAWO, 10, 1 

5175 DRAW10,0, UDRAWO, 10, l:DRAW-2 
0,0, 1 :DRAW0,-10, 1 

5180 CURSET30, 115, 1:DRAW20,0, 1:DR 
AWO, 10, 1 :DRAW-20,0, 1 :DRAWO, -10, 1 

5200 PRINT"Vous etes dans un coul 
oir,4 directions' 

5210 PRINT"sont possibles :G, D, H, R 

5215 INPUT'Que faites-vous "iAA» 
5220 IFAA*=R«THEN5000 
5225 IFAA*=A*THEN5300 
5230 IFAA«=G*THEN5500 
5235 IFAA»=D*THEN6000 
5240 GOBUB19000:GOT05200 
5300 G0SUB705 

5310 PRINT: lNPUT"Que faites-vous 
" ;aa* 

5320 ifaa*=r*then5100 
5325 ifaa*=g*then5400 
5330 ifaa*=d*then15000 
5340 gosub19000jgot05310 
5400 rem corde 
5410 hires: ink5 

5412 '20130 

5415 CURSET20, 145, 1 : IFFG*=AJ*THEN 
FILL30, l,0ELSEFILL3O,l,3 

5420 CURSET239, 150, 1 :F0RI=1T01 1 : R 
EADX,Y:DRAWX,Y, 1 :NEXT 

5430 CURSET10D, 170, 1 :F0RI=1T020: R 
EADX,Y:DRAWX,Y, l':NEXT 

5435 CURSET100, 173, 1:DRAW18,0, 1:D 
RAW5,5, l:DRAW-2,2, 1 :DRAW-5,-4, 1 : DR 
AW-18,0,1 

5436 IFFG*=AJ»THEN5465 

5440 INPUT" II y a une corde qui t 
raine par terre,que faites vous "; 
FG« 

5445 IFFG*=AJ*THEN5460 

5450 IFFG*=R*THEN5300 

5455 GOSUB19000:GOT05440 

5460 PRINT" OK. . . " 

5465 INPUT" Que faites-vous ";AA* 

5470 IFAA*=R*THEN5300ELSEPRINT:PR 
INT" Impossible" : PRINT :G0T05465 

5500 REM W.C 

5510 TEXT:CLS 

553D F0RI=1T0B:PRINT:NEXT 

5535 PRINT" C E N S U R 

E" 

5540 PR INT: PRINT: PRINT: PRINT "Pour 

des raisons que vous comprendrez, 

5545 PRINT" cette image ne sera pa 
s dif fusee. . . " 

5550 PRINT: PRINT: PRINT: PRINT :PRIN 
T"v"ous etes dans les w. c. . . " 

5555 INPUT"Euh inert, ! que faites vo 



us ?" ;AA* 

5560 IFAA*=P*THEN15100 

5570 1FAAS=R*THEN5100 

5575 PR I NT: PR I NT: PR I NT" Impossible 
" :WAIT75:G0T05500 

6000 REM PORTE DROITE 

6005 GOSUB6010:GOT06030 

6U10 HIRES: INK5 

6015 120160 

6020 CURSET239, 145, 1 :FORI=1T015 : R 
EADX, Y:DRAWX, Y, 1 :NEXT 

6025 CURSET189, 125, 1 :DRAUI5,0, 1 :DR 
AWO, -52, 1 :DRAW-5,-3, 1:DRAW5,3, 1 : DR 
AW20,-4, 1 

6026 RETURN 

6030 INPUT"Que faites-vous ";AA* 

6035 IFAA*=R*THEN5100 

6040 IFAA*=D*THEN6100 

6050 GOSUB19000:GOT06030 

6100 REM CUISINE 

6110 HIRES: INK5 

6112 120180 

6115 CURSET239, 160, 1 :F0RI=1T01 1 : R 
EADX , Y : DRAWX , Y , 1 : NEXT 

6120 CURSET100.65, 1 :FILL26, 1 , 1 : CU 
RSET150.65, 1:FILL26, 1,5 

6125 CURSET110,90, 1 :F0RI=1T07 : REA 
DX,Y:DRAWX,Y, l:NEXT 

6130 F0RI=1T06:CURSET100,90+I, 1 =D 
RAM50.0, l:NEXT 

6135 F0RI=1T07:F0RJ=106T0140STEP3 
4:CURSETJ,97+I, 1:DRAW4,0, 1:NEXT:NE 
XT 

6140 CURSET135,90, l:DRAW-2,-6, HD 
RAW7.0, l:DRAW-2,6, 1 

6142 IFDD*=AH*THEN6215 

6145 PRINT" II u a un verre et u 
ne bouteille surune etagere. . . " 

6150 INPUT"Que faites-vous ";DD* 

6155 IFDD*=R*THEN6000 

6160 IFDD*=AI*THEN15200 

6165 IFDD*=AH*THEN6200 

6170 G0SUB1900:G0T06145 

6200 ! 20200 :CURSET90, 160, 1 :F0RI=1 
T012:READX,Y:DRAWX,Y, 1 :NEXT 

6210 PRINT:PRINT"Vous avez ouvert 

une trappe. . . " 

6215 ! 20200 :CURSET90, 160, 1:F0RI=1 
T012:READX,Y:DRAWX,Y, 1 :NEXT 

6220 INPUT"Que faites-vous ";AA» 

6230 IFAA»=R*THEN6000 

6235 IFAA*=AI*THEN15200 

6240 IFAA»=E$THEN6300 

6250 GOSUB19000:GOT06210 

6300 REM PASSAGE 

6320 G0SUB3105 

6330 INPUT" Que faites-vous "iCC* 

6340 IFCC*=RtORAA*=F*THEN6inO 
6345 IFCC*=6*ANDXY O 1THEN6500 
6350 IFCC*=A*THEN6400 
6360 G0SUE19O0O:5OTO6330 
6400 REM TRAPPE 

6410 G0SUB6010 

6412 CURSFIT59, 146, 1:FILL50, 1, 1 
6415 120240 

6420 CURBET130, 156, 1 :F0RI=1T012: R 
EADX, Y: DRAWX, Y, 1:NEXT 
6430 PRINT" II y a une trappe..." 
6435 lNPUT"Que faites-vous ";AA* 



6440 IFAA*=R*THEN630D 

6445 IFAAS=DSTHEN15400 

6450 IFAA*=K»ANDEE»=AG*THEN645B 

6455 G0SUE19000:50T06430 

6458 IFX2=lTHENPRINT"C'est de j a f 
ait ! " : G0T06435 

6460 PRINT" Vous 1 ' ouvrez avet: le 
Pied de biche. " 

6465 PRINT"Vous trouvez une lampe 
, vous la prer.ez. " : XZ = 1 :G0T06435 

6500 REM TOMBEAU 

6510 HIRES: INK5 

6512 '20250 

6515 CURSE.T80, 130, 1 :F0RI = IT025 : RE 
ADX, Y: DRAWX, Y, 1 : NEXT. 

6520 CURSET100, 170, l:DRAW6,-4, 1:D 
RAW0,-18, 1 

6525 F0RI=1T05 

6530 CURSET160,70+I, 1 :DRAW25,0, 1: 
NEXT 

6535 CURSET162,70, 1 :DRAW0,-15, 1:D 
RAW5,-5,l:DRAWll,0, 1:DRAW5,5, 1:DRA 
WO, 15,1 

6540 FORI=1T010STEP3 

6545 CURSET167+I.50, 1 :DRAW0,20, 1: 
NEXT 

6550 CURSET10, 160, 1 :DRAW50, -40, Is 
DRAW0.-120, l:DRAWO, 120, 1:DRAW32,0, 
1 

6555 CURSET140, 120, l:DRAW90,0, 1 

6600 PRINT"Un tombeau ! ! ." 

6605 INPUT"Que faites-vous ";AA* 

6610 IFAA»=R*THEN6300 

6620 IFAA»=L*THEN6650 

6630 G0SUB19O0O:GOTO6600 

6650 PRINT" Quoi loser iez-vous le p 
rofaner ?":GETXX* 

6655 IFXX*="N"THENPRINT:PRINT-AH 
! BON ! " :PRINT:WAIT50:G0T06605 

6660 IFXX*="0"THEN6670 

6665 PRINT:PRINT:GOT06650 

6670 TEXT: PRINT" Vous trouvez Un m 
iroir,une masse et un parchemin. ■ 

6680 PRINT" II est ecr it dessus:" 

6685 PRINT"Le faucheur acceptera 
la cle en or." 

6690 PRINT'Un fantome a peur de s 
on image. " 

6692 PRINT:PRINT"Vous prenez les 
2 objets et vous vous" 

6693 PRINT"en allez.Une grille s' 
abat et condamnel ' entree. ..": XY=1 

6695 PRINT: PRINT: PRINT" Appu 
yez sur une touche" : GETRWY* :G0T063 
00 

7000 REM 1ER ETAGE 

7010 G0SUB6010 

7020 INPUT'Que faites vous";AA» 

7030 IFAA«=D*THEN7100 

7040 IFAA»=R*0RAA*=E*THEN1000 

7050 G0SUB19000:G0T07020 

7100 REM 3 PORTES 

7110 HIRES:INK5 

7112 120280 

7115. CURSET239, 160, 1 :F0RI = 1T029: R 
EADX, Y: DRAWX, Y, 1:NEXT 

7120 CURSET189, 140, 1 :DRAW5,0, 1:DR 
AWO, -52, 1 :DRAW-5,-3, 1:DRAW5,3, 1:DR 
AW20,-4, 1 

7125 CURSET59, 140, l:DRAW-5,0, 1:DR 



AWO, -52, is DRAWS, -3, l:DRAW-5,3, 1:DR 
AW-20,-4, 1 

7130 INPUT'Que faites-vous " ;AA* 

7140 IFAA»=ASTHEN7SOO 

7150 IFAA*=R*THEN7000 

7160 IFAA»=GSTHEN7200 

7169 IFAA*=G*THEN7200 

7170 IFAA*=D*THEN73O0 
7175 GOSUB 1 9000 :G0T07 130 
7200 REM MEUBLE 
7210 HIRES: INK5 

7215 120310 

7225 CURSET10, 160, 1 :F0RI=1T015 : RE 
ADX, Y: DRAWX, Y,l :NEXT 

7230 F0R1=91T0139STEP3B 

7235 CURSETI, 125, l:DRAW30,0, 1 3DRA 
WO, -100, 1 sDRAW-30,0, 1 sDRAWO, IOC, 1 s 
NEXT 

7240 CURSET135.70, 1 SDRAWO, 7, 1 :DRA 
Wll,0,l:DRAWO,-l, 1: DRAW- 10,0, 1 SDRA 
WO, -6, 1. 

7245 PRINT" II y a un meuble " 

7250 INPUT"Que faites-vous " ;AA* 

7255 IFAA*=R*THEN7100 

7260 IFAA*=IK*ANDZTOlTHEN7270ELS 
EG0T07266 

7265 GOSUB 19000 3 G0T07245 

7266 PR I NT "Vous ne vous souvenez 
plus du numero IC'est ";THsG0T0725 
O 

7270 IFWYOITHENPRINT-C'est ferme 

a clef . " :WAIT75:G0T07245 

7275 TEXT:PRINT"I1 y a un annuair 
e a 1 ' inter ieur. En le" 

7280 PRINT" prenant, vous faites to 
ruber une feu. lie" 

7285 PRINT" II y a quelque chose d 
e note dessus:" 

7286 TH=INT( RND ( 1 ) *999999+ 1 00000 ) 
7290 PRINT:PRINT" (TAXIS) " S/TH 
7292 PRINT:PRINT"Vous reposez l'a 

nnuaire. " 
7295 PRINTsPRINTsPRINT" Appuyez 
sur une touche" : ZT=1 sGETWK*sG0T07 

200 
7300 REM SALLE A MANGER 

7305 HIRESSINK5 

7306 CURSETI 15, 110, 1 sDRAWO, -30, Is 
DRAW20,0, 1 SDRAWO, 30, 1 

7308 120330 

7310 CURSET239, 160, 1 :F0RI=1T01 1 :R 
EADX,Y:DRAWX,Y, 1SNEXT 

7315 F0RI = 1T040 

7320 CURSETI 40+ 1*1. 2, 130+1, 1:DRAW 
0,-5, l:DRAW30,0, 1:NEXT 

7330 DRAW0,5, 1 :DRAW-29,0, 1 :DRAWO, 
-5,0:DRAW-48,-40,0 

7340 CURSET145, 136, 1:DRAW0,12, 1 SD 
RAW2,0, 1 :DRAW0,-10, 1 

7350 CURSET192, 170, 1:DRAW0, 12.1SD 
RAW2,0, 1 :DRAW0,-12, 1:DRAW16,0, 1 

7360 DRAWO, 12, 1 :DRAW2,0, 1 :DRAW0,- 
12, 1 



A SUIVRE... 



30 



TIME PILOTE 



Aux commandes d'un jet ultra-moderne, affrontez les adver- 
saires plus ou moins coriaces de diverses epoques. 



Philippe ILLOUL 




MSX 



0M9 4ooQM, x 



SUITE DU 

N°130 



6250 PLflVXU*; ", "02L1B+" 

6260 PLAVXU*; ", "T130O3L1C", "T130V9L1 

04(3" 

6270 PLAV" 

6230 PLAY' 



62 90 PLflV 



XU$; ", "02L1A+" , "L104F" 
XU* : " . "02L1F", "L104C" 
KUJ; ", "02L1I>+", "L104D+" 



"T130L1O48", "Vie 

, "L104F", "L104A+" 

"L104C", "L104F" 

, "V81103B+", "L104B+" 



6300 PLAVT130O3L1C 

T138L105C" 

6310 PLflV"02Llfl+' 

6320 PLAV02L1F". 

6339 PLAV02L1D+' 
RETURN 

6340 PLflVXU*; ", "T152V10L1O5C", "(12900 
S9T140L3O3CO4CO3CO4CO3CO4CO3CO4C-" 

6359 PLAVXU*, " , "tl52V10LlO4A+" , "02A + 
03A+02A+03A+02A+03A+02fl+03A+" 

6360 PLflVXU*; " , "T152V10L1O4F", "03F04 
F03F04F03F04F03F04F" ^RETURN 

6370 PLflVXU*, ","T152V10L1O4D+", " 3 D + 

04B+03B+04D+03B+04B+03B04B" 

6330 PLflVXU*; ", " (12000S9T140L8O3CO4CO 

3C04C03CO4CO3CO4C" 

6390 PLAY"XU*;","02A+03A+02A+03A+02A+ 

03A+02A+03A+" 

6400 PLflVXU*; ", " 03F04F03F04F03F04F03 

F04F" :RETURN 

6410 PLflV T150V10M2100S9R4L8CCR8L8CCL 

16CC","(12080S9T140L8O3D + O4P + O3B + O4B + O 

3D+04D+03B04B" 

6420 MU = 

6430 I1U = (1U + 1: »0 = 3 

6440 PLflVXT*, ","I12000S9T150L8O3CO4CO 

3C04C03C04C03C04C" 

64 50 PLflV XT*; ", " J12000S9T150L8O2A + O3A 
+ 02A + 03A + 02A + 03A + 02A + 03A+VRETURN 
6460 PLAVXT*; ", "M2000S9T150L8O3FO4FO 
3F04F03F04F03F04F" 

6470 PLflVXT*; " , "M2000S9T150L8O3D + O4P 

+03B+04P+03P+04D+03B04B" 

6480 PLflVXT*, ","M2000S9T150L8O3CO4 CO 

3C04C03C04C03C04C": RETURN 

6490 PLflVXT*; ", " M2000S9T150L8O2A+O3A 

+02A+03A+02A+03A+02A+03A+" 

65100 PLflVXT*; ","M2000S9T150L8O3FO4FO 

3F04F03F04F03F04F" 

6518 PLflV" T158V10M2100S9R4L8CCR8L8CCL 

16CC", " 03D+04D+03B+04P+03D+04B+03B04B 

" :RETURN 

6520 PLflVXT*; ","M2500S9T138R8L8O5CL8 

D+R8L8CL8D+R8D+","M2000S9T150L8O3CO4C 

03C04C03C04C03C04C" 

6530 PLflVXT*; ","I12500S9T138R8L8O5CL8 

PR8L8CL8DR8L8B","02A+03A+02A+03A+02A+ 

03A+02A+03A+" :RETURN 

6540 PLflVXT*,"," (12588S9T138R8L805CL8 

FR8CL8FR8L8F" ,"03F04F03F04F03F04F03F0 

4F" 

6550 PLflVXT*; ","PI2500S9T138R8L8O5CL8 

B+R8L8CL8B+R8L8P+","M2000S9O3P+O4D+O3 

B+04D+03B+04P+03B04P": RETURN 

6560 PLflVXT*;", "I12500S9T138R8L8O5CLS 

D + R8L8CL8B + R8L8D+","(12800S9T150L8O3CO 

4C03C04C03C04C03C04C" 

6578 PLflVXT*; ", " N2500S9T138R8L8O5CL8 

BR8L8CL8BR8L8B","02A+03A+02A+03A+02A+ 

03A+02A+03A+" :RETURN 

6580 PLflVXT*; " , " I12500S9T138R8L8O5CL8 

R8L8CL8FR8L8F","03F04F03F04F03F04F03F 

04F" 

65 90 PLAVT150M2100S9R4L8CCR8L8CCL16C 
C", "I125 00S9T138R8L8O5CL8B + R8L8CL8PR8L 
8B","03B+04D+03D+04D+03B+04B+03B04B": 
RETURN 

6600 PLAVT150V11M2500S9L0R2C", "112000 
S9T150L8O3CO4CO3CO4CO3CO4CO3CO4C" 
6610 PLAV T150V11M2500S9L8R2C" , "112000 
S9T150L802A+03A+02A+03A+02A+03A+02A+0 



"M2500S9T138R8L8O5CL8 
03F04F03F04F03F04F03F 



3A+" 

6620 PLAVT150V11P12500S9L8R2C", "(12880 

S9T150L8O3FO4FO3FO4FO3FO4FO3FO4F":RET 

URN 

6630 PL AY" T150V11M2500S9L8R2C ","112000 

S9T150L8O3D+O4D+O3B+O4B+O3D+C4B+O3DO4 

t" 

6640 PLflV T150'J11PI2500S9L8R2C ","(12080 

S9T150L8O3CO4CO3CO4CO3CO4CO3CO4C" 

6650 PLAVT159V11M2509S9L8R2C", "(12099 

S9T150L8O2A+O3A+O2A+O3A+O2A+O3A+O2A+O 

3A+" :RETURN 

6660 PLflV T150 , J11I12500S9L8R2C"," (12008 

S9T150L8O3FO4FO3FO4FO3FO4FO3FO4F" 

6670 PLflV T150V11M2500S9R4L8CR4CCL16C 

C" , "I12099S9T150L8O3D + 04B + O3P + O4D+O3B + 

04E+03P04P" 

6680 PLflVXT*, ", "I12500S9T138R8L8O5CL8 

I> + R8L8CL8B + R8B+","(12008S9T150L8O3CO4C 

03C04C03C04C03C04C" : RETURN 

6690 PLflVXT*, ","M2500S9T138R8L3O5CL8 

D+R3L3CL8HR8L8D" ,"02fl+03A+02A+03A+02ft 

+03fl+02ft+03fl+" 

6700 PLAVXT*;","M2500S9T138R8L8O5CL3 

FR8L8CL8FR8L8","03FU4F03F04F03F04F03F 

04F" : RETURN 

6710 PLflVXT*; ","I12500S9T138R8L8O5CL8 

B + R8L8CL8D + R8L8B + ","(12999S903r> + 04B + 03 

D+04B+03B+04D+03D04D" 

6720 PLAVXT*; ", " M2500S9T138R8L8O5CL8 

P + R8L8CL8D + R8B+","I12000S9T150L3O3CO4C 

03C04C03C04C03C04C": RETURN 

67 30 PLAV"XT»; " , "M2500S9T138R8L8O5CL8 

BR8L8CL8BR8L8I'","02ft + 03A + 02A + 03A + 02A + 

03A+02A+03A+" 

6740 PLAVXT* 

FR8L8CL8FR8L8 

04F" :RETURN 

6750 PLflVXT*; " , " (12500S9T138R8L8O5CL8 

B+R8L8CL8B+R8L8B+", " M2900S9O3B+O4B+O3 

D+04D+03B+04B+03D04D" 

6760 PLAVXT*; ", "M2000S9T150L8O3CO4CO 

3C04C03C04C03C04C", " T150V10L1O55 " : RET 

URN 

6770 PLflVXT*; " , " 02fl+03A+02A+03fl+02A+ 

03fl+02A+03A+", "L105F" 

6780 PLAVXT*; ", "03F04F03F04F03F04F03 

F04F", "L105S+" 

6790 PLAVT150V10N2100S9R4L8CCR3L8CCC 

", "03B+04B+03B+04B+03B+04B+03P04D", "L 

105G" :RETURN 

6880 PLAVXT*; ","(12000S9T150L8O3CO4CO 

3C04C03C04C03C04C","T155L105G" 

6810 PLflVXT*; ", "02A+03ft+02A+03B+02A+ 

03ft+02ft+03A+", "L105F" 

6820 PLAVXT*; ","03F04F03F04F03F04F03 

F04F", "L105G+" :RETURN 

6830 PLAVT150V10M2100S9R4L8CCR8L8CCC 

","03P+04B+03B+04D+03D+04B+03D04B","L 

1058" 

6840 PLAVXT*; ","I12000S9T150L8O3CO4CO 

3CO4CO3CO4CO3CO4C","T150V11R8L8O6CO5A 

+06CD+FFC" 

6850 PLAVXT*, ","02A + 03A + 02A + 03A + 02A + 

03A+02A+03A+","L8R806C05A+06CB+FF":RE 

TURN 

6868 PLAVXT*; ", "03F04F03F04F03F04F03 

F04F", "L8R806C05A+06CB+FFB+" 

6878 PLAVT150M2100S9R4L8CCR4L8CC", "0 

3B+04D+03P+04B+03D+04B+03D04B","L8R80 

6F+FB+F+L16FL8B+" 

6880 PLAVXT*; ", " I12000S9T150L8O3CO4CO 

3C04C03C04C03C04C", " T150V11R8L8O6CO5A 

+06CD+FFC" :RETURN 

6890 PLAVXT*; ", "02A+03A+02A+03A+02A+ 

03A+02A+03A+", " L8R806C05A+06CB+FF " 

6900 PLAVXT*;", "03F04F03F04F03F04F03 

F04F", "L8R806C05A+06CB+FFB+" 

6910 PLAVXT*; ", "03B + 04B + 03B + 04B + 03B + 

04B+03B04B", "L8R806F+FP+F+L16FL8B+" :R 

ETURN 

6920 IFPIUO1THEN6430 



7000 PLAVXT*; 
038+02A+03A+", 
GA+L1606C05A+" 



6930 PLflVXT*, ","(12008S9T150L8O3CO4CO 

3C04C03C04C03C04C", " T15 0V10M2500S9R8L 

805GFGA+L1606C05A+" 

6948 PLAY"XT*;","03P+04P+03B+04P+03B+ 

O4B+O3B+O4P+","T150V10M2500S9R8L8O5GF 

Sfl+L1606C05fl+" 

6950 PLAVXT*; " , " 03F04F03F04F03F04F03 

F04F", "T150V10H2500S9R8L8O5GFGA+L16O6 

C05A+" : RETURN 

6960 PLAVXT*,"," 02G+03G+02B+03G+02G+ 

03G+02A+03A+", "T150V10M2500S9R8L8O58F 

3ft+L1606C05A+" 

6978 PLAVXT*; ","I12000S9T150L8O3CO4CO 

3CO4CO3CO4C03CO4C","T150V10!12500S9R8L 

8058FGA+L1606C05A+" 

6980 PLAVXT*; ", "03t +04B+03B+04B+03D+ 

O4B + O3D + O4B+","T150', I 10(12509S9R8L8O5GF 

GA+L1606C05A+": RETURN 

6990 PLflVXT*; ", " 03F04F03F04F03F0 4F03 

F04F", "T150V10N2500S9R8L8O5GFGA+L16O6 

C05A+" 

, "02G+03G+02G+03G+02G+ 
T150W10M2500S9R8L8O5GF 
RETURN 

7810 SOUNH7,8:PLAVT120I112000S9O4L2ET 

150ET120L8EL2EL2T158GT120L8F#T150L2F# 

T120L8ET150L2ET120LSDT120L2E": RETURN 

7020 S0UNB7, 8: PLAVS9M1590O6L12CFB" :R 

ETURN 

7030 ' 

7040 ' REDEF BES LUTINS 

7050 ' 

7060 BATA7, 1,3, 3, 35, 126, 254, 254, 127, 3 

,3,3,3,6,14,15,192,0,128,128,136,252, 

254, 254, 252, 128, 128, 128, 128, 192, 224, 2 

24 

7070 'AVION DROITE 

7080 BATA0, 1,1, 1,193, 225, 255, 158,255. 

225,193,1,1,1,0,0,192,224,240,224,224 

,225,25 3, 63, 253, 225, 224, 224, 240, 224, 1 

92,0 

7090 'AVION SftS 

7100 BATA15,14,6,3,3,3,3,127,254,254, 

126,35,3,3,1,7,224,224,192,128,128,12 

8,128,252,254,254,252,136,128,128,0,1 

92 

7110 'AVION GAUCHE 

7120 DAT A3, 7, 15, 7, 7, 135, 191, 252, 191,1 

35,7,7,15,7,3,0,0,120,128,128,131,13; 

,255,121,255,135,131,128,128,128,0 

7130 'HELICO 0AUCHE 

7140 DAT A0, 0,0, 159, 192, 255, 223, 143, 7, 

3,0,3,0,0,0,0,0,0,0,252,120,248,164,1 

62,254,252,145,254,0,0,0,0 

7150 'HELICO BROITE 

7160 BATA0, 0,0, 63, 1,31, 37, 69, 127, 63,1 

37, 12T, 0,0, 0,0, 0,0, 0,249, 3, 255, 251, 24 

1,224,192,0,192,0,0,0,0,0 

T1T0 ' JET HAUT 

7100 BATA1,1,3,11,11,15,15,30,30,62,6 

2,111,111,239,255,56,0,0,120,160,160, 

224,224,240,240,248,248,236,236,230,2 

54,56 

7190 ' JET BROITE 

7200 BATA96, 120, 254, 199, 255, 127, 127,1 

24,127,127,255,199,254,120,96,0,0,0,0 

,128,248,224,252,127,252,224,248,120, 

0,0,8,8 

7218 ' JET BAS 

7228 BATA56, 255, 239, 111, 111, 62, 62, 30, 

30,15,15,11,11,3,1,1,56,254,238,236,2 

38,248,248,248,240,224,224,160,160,12 

9 8 

7238 ' JET 8AUCHE 

7240 BATA0, 0,0, 1,31, 7, 63, 254, 63, 7, 31, 

1,8,8,8,8,6,38,127,227,255,254,254,62 

,254, 254, 255, 227, 127, 30, 6,0 

7258 'GASP 

7288 BATA129,65,8,0,100,139,170,174,2 

82,8,255,8,8,65,129,8,2,4,0,0,220,10, 

218,68,288,16,248,8,0,4,2,8 

7270 -MORT 







7280 BATA0128,67,4,19,56,60,62,62,100 

,56,56,40,40,32,1,129,1,130,64,144,56 

,120,240,240,123,56,56,24,8,2,1,0 

7290 '80UC0UPE1 

7300 BATA0, 0,0, 3, 7, 15, 31, 53, 63, 31, 14, 

0,0, 0,0, 0,0, 0,128, 224, 240, 240, 252, 86, 

254,252,56,0,0,0,0,0 

7310 'S0UC0UPE2 

7320 BATA0, 0,0, 3, 7, 15, 31, 58, 63, 31, 1,0 

,0,0,0,0,0,0,128,224,240,240,252,174, 

254, 252,192,0,0,0, 0,0 

7330 'AI8LE 

7340 BAT A3, 6, 7, 5, 1,255, 127, 31, 7, 3, 2,1 

2, 4, 0,0,0, 128, 128, 128, 128, 120, 254, 252 

,240, 192, 120, 128, 96, 64, 0,0,0 

7350 'BALLE 

7360 BATA0, 0, 0,24,24,0,0,0 

7370 ' 

7380 ' TIHE PILOTE 

7390 ' 

7400 BATA0, 63, 64, 95, 95, 67, 57, 5, 5, 5, 5, 

5,5,5,5,5,5,5,5,5,5,4,3,0 

7410 BATA0, 252, 2, 250, 250, 194, 156, 160, 

160,160,160,160,160,160,160,160,160,1 

60,160,160,160,32,192,0 

7420 BATA0, 60, 66, 90, 90, 90, 90, 90, 90, 90 

,90,90, 90, 90,90,90,90,90,90, 90,90,66, 

60,0 

74 30 BATA0, 63, 64, 95, 95, 92, 89, 90,98,90 

,90,90,90,90,90,90,90,90,90,90,90,66, 

60,0 

74 40 BATA0, 255, 0,255, 255, 120, 50, 181,1 

01,101,101,101,181,181,181,181,181,18 

1,181,181,101,133,120,0 

74 50 BATA0, 240, 8, 232, 232, 232, 104, 104, 

104,104,104,104,104,104,104,104,104,1 

04,104,104, 104,8,240,0 

7460 BATA0, 127, 128,191,191,184,179,18 

0,180, 179, 104, 191, 191, 184, 179, 180, 188 

,179,184,191,191,128,127,0 

7470 BBTA0, 240, 4, 244, 244, 4, 248, 0,0, 22 

4,16,208,200, 16,224,0,0,248,4,244,244 

,4,248,0 

7480 BATA0, 0,0, 0,0, 0,0, 0,0, 8, 0,8, 0,0, 

0,0,0,0,0,0,0,0,0,0 

7490 DATA0, 63, 64, 79, 95, 92, 09, 90, 90,89 

,92, 95, 95, 92, 89, 98, 90, 90, 90, 90, 90, 66, 

60,0 

7500 BATA0, 252, 2, 242, 250, 58, 154, 90, 90 

,154,58,250,242,2,252,0,0,0,0,0,0, 0,0 

,0 

7510 BATA90,89,92,95,95,64, 127,0,0,0, 

0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,252,2,2 

50,250,2,252,0,0,63,64,79, 95,92,39,90 

7520 BBTA90, 90, 90 , 90 , 90, 90 , 90 , 90 , 90 , 8 

9, 92, 95. 79, 64, 63. 8.0. 252. 2. 242. 258. 58 

,154,90 

7530 BATA90, 90, 90, 90, 90, 90, 90, 90, 90,1 

54,50,250,242,2,252,0 

7540 BATA0, 63, 64, 95, 95, 92, 89, 98, 98, 89 

,92, 95,95,92,89,98,98,89,92,95,95,64, 

63,0 

7550 BATA0, 252, 2, 250, 250, 2, 252, 0,0, 22 

4,16,208,208,16,224,0,0,252,2,250,250 

,2,252,0 

7560 BATA170,85,170,85,178,85,170,85 

7570 ' 

7580 ' V.P.S. 

7590 ' 

7600 BATA0, 57, 123, 255, 189, 189, 153, 65, 

57, 61, 117, 253, 189, 153, 66, 68,0, 192, 192 

,192, 192, 192, 192, 192, 192, 192, 192, 199, 

143,31,22,28 

7610 BATA0, 31, 63, 127, 131, 153, 165, 173, 

153, 130, 156, 184, 184, 184, 176, 224, 0,0,1 

28, 192, 192, 192, 192, 128, 0,0, 0,7, 15, 31, 

22,28 

7620 BATA0, 15, 31, 63, 66, 158, 175, 191, 15 

9,67,57,29,61,121,130,124,0,192,128,8 

,0,0,0, 128, 192, 192, 192, 199, 143, 31, 22, 

28 
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5400 


d=30:d 


5410 


SOUND 


5420 
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5450 


SOUND 


/2,7 
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Suite de la page 28 

7,1 GOSUB 640:WIND0U SW 
i = 1 TO 51 :F'RINT:NEXT i: 



= PROCEDURE MUSIQUE 

d=REMAIN<1) 

1 ,379,d,7:S0UND 2,0,d,0 
1 ,284 j d, 7: SOUND 2,0,d,0 
1 ,0,2,0 : SOUND 2,0,2,0 
1 ,284,d/2,7:S0UND 2,0,d 

1,253,d/2,7:S0UND 2,0,d 

1,239,d,7:S0UND 2,0,d,0 
1 ,213,d,7:S0UND 2,0,d,0 
1, 253, d, 7: SOUND 2,0,d,0 
1 , 233, d, 7: SOUND 2,0,d,0 
1 ,284, d, 7: SOUND 2,0,d,0 
1 , 284 , d , 7 : SOUND 2 , 568 , d 

1 ,284, d, 7: SOUND 2,379,d 

1,239,d/2,7:S0UND 2,379 

1 ,233,d/2,7:S0UND 2,338 

1, 253, d, 7: SOUND 2,313,d 



,7 
5560 

,7 

5570 

,7 

5580 

,7 

5530 

,7 

5600 

,d/2, 

5610 

,d/2, 

5620 

,7 

5630 

,7 

5640 

,7 

5650 

, d/2 , 

5660 

,d/2, 

5670 

,7 

5680 

, d/2, 

5630 

,d/2, 

5700 

,7 

5710 

,7 

5720 

,7 



SOUND 

SOUND 

SOUND 

SOUND 

SOUND 

7 

SOUND 

7 

SOUND 

SOUND 

SOUND 

SOUND 

7 

SOUND 
7 
SOUND 

SOUND 

7 

SOUND 

7 

SOUND 

SOUND 

SOUND 



1 ,253, d, 7: SOUND 2,284,d 
1 ,253,d,7:S0UND 2,338,d 
1, 190, d, 7: SOUND 2,319,d 
1, 239, d, 7: SOUND 2,379,d 
1,213, d/2, 7:S0UND 2,373 
1 ,130, d/2, 7: SOUND 2,373 
1 ,179,d,7: SOUND 2,373,d 
1,179, d,7lS0UND 2,426,d 
1 ( 179, d, 7: SOUND 2,284,d 
1,153, d/2, 7:S0UND 2,284 
1,1 79, d/2, 7: SOUND 2,284 
1, 190, d, 7: SOUND 2,284,d 
1, 190,d/2,7:S0UND 2,253 
1,1 30, d/2, 7: SOUND 2,239 
1 ,130,d,7:S0UND 2,213,d 
1 ,253, d, 7 x SOUND 2,758,d 
1 ,239, d, 7: SOUND 2,568,d 



5730 
,d,7 

5740 

,d,7 

5750 

,7 

5760 

>7 

5770 

,7 

5780 

,7 

5730 

5800 

,7 

5810 

,7 

5820 

,d/2, 

5830 

/d/2, 

5840 

,7 

5850 

5860 

,7 

5870 

5880 

,7 

5890 

,7 

5900 

,7 

5910 

/2,0 



SOUND 

SOUND 

SOUND 

SOUND 

SOUND 

SOUND 

SOUND 
SOUND 

SOUND 

SOUND 

7 

SOUND 

7 
SOUND 

SOUND 
SOUND 

SOUND 
SOUND 

SOUND 

SOUND 

SOUND 



1 ,130, d/2, 7: SOUND 2,568 

1 ,190, d/2, 7: SOUND 2,506 

1 ,284, d, 7: SOUND 2,478,d 

1, 284, d, 7: SOUND 2,426,d 

1 ,301 ,d, 7: SOUND 2,506,d 

1,301 ,d,7:S0UND 2,478,d 

1,0,d,0:S0UND 2, 568, d, 7 
1 ,284, d, 7: SOUND 2,568,d 

1,19O,d,7:S0UND 2,313,d 

1 ,130, d/2, 7: SOUND 2,319 

1 ,169,d/2,7:S0UND 2,313 

1 ,159, d, 7: SOUND 2,758,d 

1,142,d,7:S0UND 2,0,d,0 
1, 169, d, 7 1 SOUND 2,284,d 

1 , 139, d, 7 5 SOUND 2,0,d,0 
1 ,190,d,7:S0UND 2,319, d 

1, 190, d, 7: SOUND 2,239,d 

1 , 1 90 , d , 7 : SOUND 2 , 338 , d 

1,213, d/2, 7lS0UND 2,0,d 



5920 SOUND 1 , 239 , d/2 , 7 : SOUND 2,0,d 

/2,0 

5930 SOUND 1 , 21 3 , d, 7: SOUND 2,0,d,0 

534-0 SOUND 1 , 21 3 , d ,7 : SOUND 2,233, d 

,7 

5950 SOUND 1 ,21 3, d, 7: SOUND 2,373,d 

,7 

5960 SOUND 1 , 239, d/2, 7: SOUND 2,0,d 

/2,0 

5970 SOUND 1 , 253, d/2, 7: SOUND 2,0,d 

/2,0 

5980 SOUND 1 , 233 , d, 7 : SOUND 2,0,d,0 

5330 SOUND 1 , 233, d, 7 i SOUND 2,284,d 

,7 

6000 SOUND 1 ,239, d, 7: SOUND 2,426,d 

,7 

6010 SOUND 1,233, d/2, 7: SOUND 2,379 

,d/2,7 

6020 SOUND 1 ,239, d/2, 7: SOUND 2,338 

,d/2,7 

6030 SOUND 1 ,253, d, 7: SOUND 2,319,d 

,7 

6040 SOUND 1 ,284, d/2, 7: SOUND 2,0,d 

/2,0 

6050 SOUND 1 ,319,d/2,7:S0UND 2,0,d 

/2,0 

6060 SOUND 1 ,284, d, 7: SOUND 2,478,d 

>7 

6070 SOUND 1 ,338, d, 7: SOUND 2,0,d,0 

6080 SOUND 1 ,319,d,7:SOUN0 2,0,d,0 

6090 SOUND 1,31 9, d/2, 6 

6100 SOUND 1,313,d/12,3 

6110 SOUND 1 ,319,d/8,4:F0R i=1 TO 

500: NEXT: EVERY 7,1 GOSUB G40:RETUR 

H 
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MARCHE EN BULLANT ! ! 



FX 702 P 



Vous voilci marchand de glaces sur une plage en plein ete. 
Par une gestion tres approfondie, faites en sorte de renta- 
biliser au maximum votre sympathique "entreprise"... 

Xavier DE BEAUCHESNE 

Mode d'emploi : 

L'imprimante FP 10 est conseillee. DEFM 0, entrez le programme en P0. 

Faites SAC (EXE) et 230.702, 85, (pressez la touche STATISTIQUE). Lan- 

cez par RUN ouF1P0.Ce programme peut etre interrompu et repris ensuite 

au debut du tour suivant par RUN 20. 

Apres affichage du titre, I'appui sur CONT fait apparattre le record, un 

second appui demarre le jeu. 

Vous disposez au depart de 2000 francs en caisse et de franc sur un 

compte en banque. Chaque montant vous sera specific en debut de jeu 

et a chaque tour (une journee de travail). Vous pourrez evaluer vos talents 

de gestionnaire, au terme de dix jours de vacances. 

Le programme vous demande de choisir la plage oil vous desirez exercer 

vos talents : 

1 - Plage connue et tres frequentee. 

2 - Plage moins connue, mais frequentee par des gens fortunes. 
Vous devez regler par cheque, une taxe de plage qui eprouvera durement 
votre compte. Mefiez-vous de la concurrence qui risque d influencer vos 
futurs clients. Pour mener a bien votre entreprise, il vous faut investir dans 
la publicite, mais plusieurs tours de jeu seront necessaires pour evaluer 
sa rentabilite. 

1 - Radio locale : 2000 francs. 

2 - Affiches murales : 900 francs. 

II vous faut remplir vos 6 stocks de matieres premieres, qui apparaissent 
sous la forme de six zero en debut de partie (appuyez ensuite sur CONT) : 

- Cremes et parfums pour les glaces. 

- Pains et saucisses pour les hot dogs. 

- Bieres. 

- Chocolat en poudre pour les chocolats chauds. 

Ces decisions dependent bien sur de vos finances (caisse) et du cours 



des produits. Toutefois, il est preferable de bien s'approvisionner pour eviter 
d'eventuelles ruptures de stocks. 

Vous devez ensuite decider du nombre d'unites de glaces, de hot dogs 
et de chocolats chauds a produire et fixer leur prix de vente (ainsi qu'aux 
bouteilles de biere). Ces decisions sont d'une extreme importance, car 
tout produit non vendu (sauf pour les canettes), sera perdu et reduira 
d'autant vos eventuels benefices. 

Les prix de vente sont a fixer judicieusement. Trop chers, ils risquent de 
decourager les vacanciers. Trop bas, la demande risque de depasser I'offre 
(manque a gagner). Vous pouvez vendre peu mais relativement Cher, ou 
beaucoup et bon marche; a vous de fixer votre politique commerciale. 
De plus, la variable meteo est un facteur essentiel a ne pas negliger : 

- S'il fait chaud (37 % de chance qu'il y ait du soleil), la demande de gla- 
ces et de bieres sera importante. 

- S'il fait froid, ce seront les hot dogs et les chocolats chauds qui auront 
du succes. 

Le programme indique ensuite le nombre de clients et le bilan de vos ven- 
tes journalieres. Votre offre (nombre de produits proposes) rencontre la 
demande des consommateurs : 

- Si la quantite demandee est superieure a la quantite offerte, vous etes 
en "rupture" (manque a gagner). 

- Si la quantite proposes est superieure a la demande (surestimation du 
potentiel de vente), le prix de revient de chaque produit non vendu sera 
retire des benefices. 

A la question "Banque ?", vous pouvez repondre : 
"1" : depart d'argent. 
"2" : retrait d'argent. 
"0" : aucune activite banquaire. 

Si en fin de journee, votre caisse renferme plus qu'une "certaine" somme 
d'argent, vous avez 60 % de chance de vous en faire voler une partie pen- 
dant la nuit (charmant I). 

L'affichage du bilan final de vos activites a lieu au terme de vos joyeuses 
vacances (10 jours). Le prix des produits stockes est comptabilise, ainsi 
que le contenu de la caisse et le solde de votre compte (500 francs 
d'amende pour un solde negatif). Votre score obtenu est le total ainsi 
effectue. 






MENTip! 




LIST ALL 

»** PRE LIST 

fflR! 26 PR8: 1688 

P8: 1A66 STEPS 
l VAC :PRT "MARCH 

EENBULLRRTM" 

,">RECORD";SX:S 

=2e3 
28 H8IT 34:fl=fi+l:P 

RT A!"e JOUR". " 

CAISSE";B,"BAN8 

UE":C 
396 E=2E3:Z=9:H=2ee 

UUP "PLAGE", 6: 

IF 6=2;E=5B8:Z= 

15:H=88 
488 PPT "TAXE PLAGE 

"'Hi C=C— H 
415 IF C<8;PRT "BAN 

«&'.*,' SOLDE - 

588 D=586:H=2e3:INP 
"PUBLICITE",6: 

IF 6=2;D=286:H= 

986 
529 C=C-H'.PRT "«ST0 

CCS:".0;PiQ!R!S 

STISTOP 
538 Z=3*RND(RRNI.-3 

):I=Z+.83:J=Z*1 

.67:K=I*1.7:L=I 

-,95:H=L*2 



548 IF 2(1 THEN 538 
558 PRT "*C0URS:M 

;lt;Z;J;K!L:STOP 
:PRT "*RCHRTS: 

";INP N,U,V,H,s 

,1 
568 F=ABS N*1+ABS U 

♦MBS V+Z+fiBS 

H*.J+ABS M+flBS 

y*t 

578 PRT "TOTAL ACHfi 
TSt'JFilF F)B;P 
RT "TROS CHER!" 
:60T0 558 

588 e=B-F:0=0+IHT N 
:F=P+IHT U:e=6+ 
INT V:R=R+IHT U 
:S=S+1HT X:T=Tt 
INT Y 

598 PRT "*ST0CKSi". 
QsPSSiRiSi! 

688 C=C-H:l=RANl:H= 
28:GJ="0URA6BN" 
!J=7SK=39:L=17: 
Pf=37 

628 IF !i.84;H=2.4: 
6$="FR0ID":J=4: 
H2iL=3iK*3! 

648 IF fe.I4iffel.il 
6$="flVERSE":J=2 
3:K=37'.l=13iffe2 

666 If fe.MilfeUi 
S$="NUflfiEUX":J= 
38:K=2l:L=35:H= 



6 
6S8 IF fe.i3lrft.li 

S*="S0LEIL":J=4 
3!K=9:L=I«iH=5 
788 I = I NT ((E/HVl. 

3+D 
1188 IHP "*PRODUCT!0 
H: -6LHCE",D:IF 
DX0+P)/2 THEN 
j 189 
1128 INP "-HOT", E: IF 
EXQ+RV2 THEN 
1128 
1146 INP "-CH0C0.",F 
ilF F>T THEN 11 
48 
1166 0=INT 0-D:P=INT 
P-D:Q=1HT Q-E: 
R=IHT R-E:T=INT 
T-F 
1288 INP "*FR!X VENT 
E: -GLACE", H."- 
HOT",N,"-BIERE" 
,U,"-CH0C0.",V 
1228 IF H>Z*1.4:l=l-' 

1.4 
1239 IF H)58:,l=8 
1246 IF N>Z!l=!/1.4 
1256 IF N>48;K=6 
1288 IF U>6:I=I/1,1 
1296 IF 0>35;L=8 
1368 IF V>5iI=I/l.l 
1318 IF V>25;Pt=8 
I486 PRT "METE0:"!6$ 
■INT I!" CLIENT 



S":Z=1e2 
1428 J=INT (!*J/ZiK= 

IHT (I*K/ZiL-iH 

T U*L/Z:H=INT 

CUH/Z 
1446 IF J>DiJ=D 
1458 IF K>EiK=E 
1468 IF L)S!L=S 
1478 IF H>F;i1=F 
1488 y=H*J+H*K+U*L+V 

*N 
1498 B=B+t':S=S-L 
1688 PRT "*YEHTES:", 

,t;k;l;k,"*BILAN 

:".J-DiK-E!L;H- 

F 
1788 PRT V," FRS GAG 

NES", "CAISSE:"; 

B:INP "BANQUE", 

Z 
1726 IF Z=lilHP "DEP 

0T",X:C=C+ABS X 

:B=B-ABS X 
1748 IF Z=2;IHP "RET 

RAIT",X:C=C-ABS 
X:B=B+ABS X 
1886 IFBi4E3!lFRHN 

f).4!PRT "AU VO 

L!"iB=B-2e3 
1988 IF B*18 THEN 28 
2888 G=(0+P+6+R+S+T) 

*2 
2168 PRT CSR 6!"** F 

IN **" 
2286 PRT "+ST0CKS:", 



o;p;0;r:s;t,"="- 

;B!» F" 

2285 PRT "*CAISSE:", 
B 

2368 PRT "*BflHQUE:"> 
C : I F C(9;PRT "A 
ffiN[)E:568F":C=C 
-586 

2358 6=G+B+C 

2488 PRT "T0TAL="!IN 
T6;" FRS": IF G 
)SX;SAC iSTAT 6 
:PRT "RECORD!! 

Jl 

2568 PRT "HERCnVA 
LA FROCHAINE., 
,",""; END 

*n VAR LIST 

WR: 26 PR6i 1688 



II = 1 



2888 



E = 
F * 
6 = 



J =8 

I =8 
L =8 

II =6 



= 6 
P =8 
8 =8 
R =8 
S = 8 
T =6 
1! =8 
V =8 
H =6 
II = 6 
r = 6 
Z =9 

EXEMPLE 

SARCHE EN BULLANT!! 

>REC0RD 236762,85 

\l JOUR 
CAISSE 2886 
6ANGUE 9 
PLAGE' 

TAXE PLAGE 88 
BAN6UE: 
SOLDE - 
PUBLICITE' 

J 

♦stocks; 

68666 8 

♦COURS; 
2.9 3.9 2.87 3.4569 



♦ACHATS: 

ie 

t 

12 
i 

25 
i 

28 
' 

5 
t 

13 

TOTRL ACHATS: 246.68 
8 

♦STOCKS: 

16 12 25 26 5 13 
♦PRODUCTION: -GLACE? 
28 

♦PRODUCTION: -GLACE' 
18 

-HOT' 
26 

-CH0C0.' 
18 

♦PRIX VEHTE: -GLACE' 
16 
-HOT' 



ETC... 



VIC 20 

Y Suite de la 
page 10 

2545 P0KE42?5+fll+23,32 

2559 RETURN 

25€0 P0KE4525 , 32 : P0KE4547 / 32 = P0KE4 

569, 32 : FORM=0TOVI : P0KE4525+22*M, 96 

: NEXT 

2570 RETURN 

2600 P0KE36877 , 220 : Pi:iRM=-0TO255 : POK 

E36879..M : P0KE36878; (255-M)/17: NEXT 

2610 IFVI=0THEN2700 

2620 VI=VI-1 

2630 P0KE36379, 9 : P0KE36878, 15 ■ POKE 

36877,0 

2635 I FC C K ) O0THENGOSUB2900 : GOTO30 

60 

2640 GOSUE2560 : GOTO2050 

2700 P0KE36869 , 192 : P0KE36874 , : POK 

E36876 , : P0KE36877 , : P0KE36875 , 9 

2710 PRINT'TJT 

2720 P0KE36879..8 

2730 PR I NT "•*•*•*•*♦***#*•*#*•*•*" 

2740 PRINT"«#*» MISSION F. 15 ♦•*#" 

2^50 PR I NT " •*##»*»*»*»*»*»*»*#*»*M 

»"; 

2760 IFVfl=7THENENH 

2770 R(ll,VR)=SC : fl(12.VH:)=Cfl 

2780 B=0 : C=0 

2790 P0KE4231+E,C 

2800 IFPEEK (37151 )=94THENC=C+. 5 

2810 Fl(INT(B),Vfl)=C:P0KE37154,127 : 

I FPEEK < 37 1 52 ) = 1 1 9THENB=E+ . 2 

2820 IFPEEKC37151>=113THEN2360 

2830 IFB>=UTHENB=10 



2840 IFC=26.5THENC=0 

2850 OOTO2790 

2860 FORT=0TO6 

2870 FORM=0TO10 

2880 P0KE4228+T*44+f1,fl<r1,T) 

2890 NEXT : PR I NT " l»»»MM>»»t3C » fl U 
1 , T ) = PR I NT " l»MM»H*»C R "fi< 12 / T> : 
NEXT 

2891 PRINT" SB PRESSEZ UNE rOUCHE" 

2895 GETB$:IFB*=""THEN2895 

2896 SC=0:Cfl=0 

2897 vfl=Vfl+l •POKE36869,205TS=0 ; TV 
=0 : Cfl=100 • VI=2 : f1=0 : B=0 : Cf.K>=0 : POKE 
36878, 15 : GOTO 1005 

2900 FORT=0TO2 • P0KE4 1 1 1 +T , 32 : NEXT : 

FORT=0TOV I : P0KE4 1 1 1 +T , 96 : NEXT : RETU 

RN 

3000 PR I NT " .T' : FORM=0TO22 : POKE4096+ 

22*11 , 1 1 8 : P0KE4 1 1 7+22#M , 11 8 : POKE460 

2+M, 113: NEXT 

3006 P0KE36369 , 205 : OOSUE2900 

3007 R=0 : E=0 : C=0 : D=0 i E=0 : F=0 : 6=0 : H 
=0 : I =0 : J=0 : K=0 : L=0 : M=0 : H=0 : 0=0 ; P=0 
: Q=0 ; R=0 : S=8 : T=»3 

3010 H*INT<RNIK1)*6):D»0 

3020 FORT=0TOfl 

3030 E(T)=I NT <■. RND (, 1 ) *3+2 1 > 

3040 ca:>=iNT':RNixi:>*i3+2:>:D<T:>=i0 
l 

3050 NEXT 

3060 FORT=0TOR 

3065 PR I NT "?•■•■■»■«" SC 

3070 P0KE4118+C<T>+B<T)/D<T) : P0KE4 

113+C(T>,32 

3080 NEXT 

3085 OOSUE4740 

3090 FORT=0TOfl 

3100 TS=TS+1 

3110 IFTS>300THENTS=0' : OOTO4900 

3120 TV=TV+1 : IFTV>700THENTV=0 : C'r.K:) 

=0:TS=0 : GOTO 1005 

4000 C(T)"C<T)+B<T) 



4010 NEXT 

4020 OOSUB4500 

4030 IFfl+l=DTHEN3010 

4040 GOSUB4740 

4140 n=INT<RND<l)*3):lFn=lTHENK=IN 

T < RND < 1 ) *H ) : I FD ( K ) =32THEN3060 

4150 IFHO1THEN306O 

4160 F0RL=lT0(4579-<4118+C(K)>:)/22 

: POKE4 1 1 8+C < K > +L*22 , 1 1 9 : P0KE4 1 1 3+C 

(K)+L#22,32 

4170 IFPEEK(4140+C';K>+L*22> = 101THE 

H2600 

4180 NEXT 

4190 GOSUB4740 

4490 GOTO3060 

4500 FORT=0TOFI 

4510 IFPEEK<4118+C<T)+B<T)>=118THE 

NP0KE41 18+C<T> , 32 : Pa;'-0 : B^B+1 ; Da 

)=32 

4530 NEXT 

4550 RETURN 

4600 FORH=0TO9: IFPEEKC4547+E-22-N* 

22 > = 1 1 THENSC=SC+75 • GOSUB4640 

4620 P0KE4547-22+E-N«22, 10OPOKE45 

47-22+E-N*22,32 

4630 NEXT: RETURN 

4640 FORT=0TOfl:IFPEEK<4118+C<T))=l 

01THENBCT>=0 : D=D+1 D<T)=32 : 00SUB47 

00 : RETURN 

4650 NEXT 

4660 RETURN 

4700 FORT=0TO50 : P0KE36877 , 220 : NEXT 

• P0KE36377, : SC=SC+75 : RETURN 

4740 F0RQ=1T02:P0KE4547+E, 101: IFF< 

:>0THENPOKE4547+F+E , 32 

4745 F=0 

4750 IFPEEK<37151)=110THENE=E-1 : F= 

F+l 

4760 I FPEEK < 37151 > = 1 18THENE=E+22 : F 

=F-22 

4770 IFPEEK(37152>=119THENE=E+1 :F= 

F-l 



4780 P0KE37 1 54 , 1 27 : 1 FPEEK < 37 1 5 1 > = 1 

22THENE=E-22:F=F+22 

4790 I FPEEK < 37 1 5 1 > =94f)NDR=0THENGOS 

UB4600 

4800 IFPEEKC4547+E>=1 13THEHE-E+F 

4310 IF4547+E<4338THEIC=E+F ' 

4830 NEXT: RETURN 

4900 FORT=0TOP, : P0KE41 18+C(T) , 32 : NE 

XT 

4905 P0KE4633+R, 105 

4908 P0KE4539+R, 102 : P0KE4590+R, 1 10 
: P0KE46 1 1 +R , 1 03 : P0KE46 1 2+R ,111: RQK 
E4632+R, 104 

4909 P0KE4633+R/ 105 

4910 P0KE4634+R ,112: P0KE4635+R , 1 1 3 
: P0KE4654+R, 106 : P0KE4655+R, 107 : POK 
E4656+R,115 

4915 P0KE4657+R,114 

4920 P0KE4677+R, 108 :P0KE4678+R, 1 16 

: P0KE4699+R, 109 : POKE4700+R, 1 17 

4930 P0KE4676+R , 32 : P0KE4679+R , 32 : P 

0KE4721+R, 32 : P0KE4722+R, 32 

4940 R=R-22 : GOSUB4740 

4950 F0RT=1T02: IFPEEK'; 37151 >=94THE 

NGOSUB5000 : NEXT 

4960 IFTR>=20THENTR"0 : COTO5O30 

4970 IFR=-633THEN3000 

4980 GOTO4903 

5000 P0KE4525+E+S, 10OPOKE4525+E+S 

, 32 : IFPEEK(4525+E+S-22K>32THEHTR= 

TR+l:S=0: RETURN 

5010 S=S-22: I FS=-220THENS=0: RETURN 

5020 GOTO5000 

5030 P0KE36879 , T i P0KE36877 , 220 : POK 

E36878,':255-T:)/17 

5040 I FT=255THENSC=SC+500 : P0KE3687 

9,9: R=0 : P0KE36877, 8 : P0KE36878 , 15 : G 

OTO3000 

5050 T=T+l:GOTO5030 

READY. m 
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la page pedagogique 



la page pedago 



Pascale OLIVIER nous propose, en francais sur son standard japonais, une superbe revision des verbes 
irreguliers anglais. 



OE T¥ ITEMS ,TU M Ti£NS 





SEAiJCasp B&ucoup pcui 7A&> 





cpertr* ton jeu .' a*/ A//ea/r - 

kMieuy. ftiTbB oouEP Ala 





GRAMM 



MSX 



Mode d'emploi : 

Ce programme d'environ 23 Ko, propose trois options : anglais-francais, 

francais-anglais et auto-travail. Effectuez votre choix en placant le repere 

en face de I 'option choisie par les touches directionnelles du curseur, puis 

validez par appui sur la barre d'espace. Les indications necessaires sont 

incluses. 



38 

4e 
58 

68 

78 

(7? 

88 

98 

188 

118 

128 

138 

148 

158 

L2D 

168 

178 

REM 

188 

198 

288 

218 

L2U 

228 

R6" 

238 

OIL 

248 

Rl" 

258 

A 

268 

P 

278 

R1U 

288 

R2D 

298 

L2R 

388 

318 

328 

P2U 

338 

348 

ui- 

358 
368 
378 
388 
398 
488 
418 
428 
438 
448 
458 
468 
470 
488 
498 
588 
518 
528 
538 
548 
558 
568 
578 
588 
598 
688 
618 
628 
638 
648 
658 
668 
678 
688 
698 
788 
718 
728 
738 



KEV OFF 

LOCATE 8,8,8 

CLEAR 

PEFUSR-fcHCC 

POKE 61000! , INT(RNP(1)*5> 

0PEN"GRP" FOR OUTPUT ASM 

A»=CHR«(71>+CHR$(82)+CHR$(65)tCHR« 

>+CHR$(77> 

FOR 1=1 TO 18 

KEV<I)0N 

KEYI, A*»CHR»(13> 

NEXT 

' - LETTRES EN BODE 6RAPHIGUE - 

R0*-"R4F1P461E1U4H1L4P1R1L2P1R2P1 
1R2P1L2R1P1R3" :REM 

HR«."P6R1U6R1P6U6P3R4P3U6" REM H 

CR*-"P4R1P1U6R1P6R3E1G1L3U6R3F1" l 

C 

LR»-"P6R1U6R1P6R4U2" :REM L 

IR*--R4L1P6R1L2U6L1P6L1- :REN I 

UR»-"P5R1P1USR1P6R3E1U5" REN U 

RV*-"R2HL2HRZHR1L2HR2L1P1R2P1 
1R2E1U1E1U2' :REH V 

ER*-"R6L6P1R2HL2P1R4L4P1R2P1L2P1 

REN E 

FR»-"R6t6DlR2Pll2£>lR2HL2R4L4DlR2 
2" :REN F 

RR«-"P6R1U6R1P6U6R3F1»261L2R1P1F1 

REN R 

AR$-"P5R1U6R1P6U2R4P2U5H1L4" :REN 

PR*--P6R1U6R1»6U2R3E1U2H1L5" :REN 

HR*-"P6R1U6R1P6U6P1R1P1R1HU1R1U1 
IPS" REM H 

SR»-"R4F1H1L4P1R1L2»1R2P1L1R4P1L1 
1L2P1L3H1F1R4" :REH S 

8R»""R4F1H1L4P1R1L2P1R2P1L2»1R2H 
1P1R4E1U2L2" REN 8 

TR*-"R6L2P6L1U6L1P6" -REM T 

PR»-"P6R1U6R1P6R2E2U2H2L1" REN P 

NR*-"P6R1U6R1P6U6P1R1P1R1P1R1P1R1 
6" : REM N 

COLOR 2,1,1 

YR»»"R2P1L2R1P1R1P4R1U4P4R1U4R1E1 

REN V 

CLS 

POKE iHF3PE,6H0 

POKE »HF7C4,8 

COLOR 2,1,1 

L-USR(8> 

SCREEN 2,8,8 

REN 

REN - LECTURE PATH SPRITES 

REN 

MR V*(48) 

RESTORE 7468 

FOR I«l TO 5 

FOR 8-1 TO 8 

REAP SP» • 

A«(I)-A»(I)+CHR«(VAL(SP$)) 

NEXT 8 

NEXT I 

REN 

REN - DEFINITION PES SPRITES - 

REN 

FOR 1-1 TO 5 

SPRITE»(I)-A$(I> 

NEXT I 

POKE iHF3PB,8 

REM 

REN - PESCENTE SPRITES * MSX * - 

REN 

0-1 

X«121 

FOR I--12T0 75 STEP 1 

PUT SPRITE 0, (X, I), 5,0 

NEXT I 

0-0 + 1 

IF 0»4 THEN 748 

X-X + 8 

60TO 648 

REM 

REM - AFFICHAGE " PRESENTS " 

REM 



748 

758 

768 

778 

788 

798 

888 

318 

828 

838 

848 

858 

868 

878 

888 

898 

988 

918 

929 

9 39 

948 

958 

969 

979 

CC 

938 

998 

VV + 1 

1988 

0T09 

1818 

1828 

1838 

1848 

1859 

1868 

1978 

1888 

1898 

1188 

1118 

1128 

1138 

1149 

1158 

1169 

1178 

1188 

-872 

-873 

1198 
1288 
1219 
1229 
1238 
1248 
1258 
1.33 
1269 
3141 
1278 
1288 
1298 
1388 
1318 
1328 
1338 
1348 
1358 
1368 
1378 
1388 
1398 
1488 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 



X-188 

V-188 

PSETCX 

DRAW'C 

PSETtX 

PRAU-C 

PSET<X 

PRAU"C 

PSET(X 

PRAU"C 

PSET(X 

PRAU"C 

PSETCX 

PRAH-C 

PSET(X 

DRAITC 

PSETCX 

PRAIPC 



,V),1 
9XPR», " 
+8, V),l 
9XRR*; " 
+16,Y>,1 
9XER*; " 
♦25,Y>,1 
9XSR*; " 
+32,V),1 
9XERI; " 
+48,Y>,1 
9XNR*, " 
+48,Y>,1 
9XTRI; " 
♦56,V),1 
9XER«; " 



'- PEGRAPE " PRESENTE ■ 

BB=8: YY=182CC=8 
FOR 1-102 TO 166 
IF POINTCI, VV)-9 THEN PSETd.YV), 

NEXT I 

IF BB-2 THEN 1088 ELSEBB-BB+1 . VY = 

GOTO960 

IF VV=194THENBB-0:CC=6 : YY=YY+1 :B 
60 

FOR 1-1 TO 780 

NEXT I 

'- REMONTE SPRITES * MSX * - 

= 1 

X-121 

FOR I-75T0-12 STEP-1 

PUT SPRITE 0, (X, I>,5,0 

NEXT I 

0-0*1 

IF 0=4 THEN 1158 

X-X + 8 

GOTO 1989 

CLS 

LINE(20,10)-(245,13),7,BF 

LINEC242, 13) -(245,186) , 7,BF 

REM 

REN - LECTURE PATA LINE GRAMM 
REM 



REST 
FOR 
REAP 
IF I 
IF 
IF 
IF I 

50785 
LINE 

>),2 
NEXT 
PUT 
REM 
REN 
REN 
PSET 
PRAU 
PSET 
COLO 
PRIN 
PSET 
PRAU 
PSET 
PRAU 
PSET 
PRAU 
PSET 
PRAU 
PSET 
PRAU 
PSET 
PRAU 
PSET 
PRAU 
A*-I 
FOR 



ORE 7110 
1-1 TO 135 

IX, IV, IZ 
>47 THEN IX=IX»2 
I>82 THEN IX=IX*4 
IM13THEN IX=IX+50 
Z-0 THEN PSET(IX-H0,120»<IV* 
348310 ),1: GOTO 1278 

(IX+18,128+<IV*1. 3350785340 

I 

SPRITE 4, (20, 20), 15, 4 

- AFFICHA6E PE P. OLIVIER - 



(31,2 

"C15X 

(40,2 

R 15 

T»l, 

(48,2 

"C15X 

(56,2 

"C15C 

(65,2 

"C15X 

(72,2 

"C15X 

(81,2 

"C15X 

(88,2 

"C15X 

(97,2 

"C15X 

NPUTf 

1-8 T 



2),1 
PRI; " 
2), 1 



2) 

R0«; " 

2) 

15XLR*; 

2),1 

I R » ; " 

2) 

RU$; " 

2) 

IR«, " 

2) 

ER«, " 

2) 

RRI; " 

(1) 

2 



1538 
1548 
1558 
1560 
1570 
1588 
1598 
1688 
1618 
1628 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1780 
1718 
1728 
1738 
1748 
1758 
1769 
1779 
1788 
1790 
1808 
1818 
1820 
1830 
1848 
1858 
1868 
1879 
1888 
1898 
1908 
1918 
1928 
1938 
1948 
1950 
1968 
1978 
1980 
1990 
2000 
2010 
2020 
2030 
2940 
2050 
2060 
2070 
2088 
2898 
2180 
2110 
2120 
2130 
2140 
2150 
2160 
2170 
2188 
2198 
2288 
2218 
2228 
2238 
2248 
2250 
2268 
2278 
2288 
2298 
2388 
2318 
2328 
2338 
2348 
2358 
2368 
2378 
2388 
2398 



PUT SPRITE I, (8,0),0, I 

NEXT I 

COLOR 7,1,1 

SCREEN 2 

A$=" " 

B*-" " 

C*=" " 

»*■" " 

VR»=" • 

REN 

REN - CAPRE PU MENU 

REM 

LINE (20,20)-(236,20),2,BF 

LINE-(236,171),2,BF 

LINE-(20,171),2,BF 

LINE-(20,28),2,BF 

X-112 

V-18 

REN 

REM - AFFICHAGE PE MENU 

REN 

PSET(X, V>,1 
PRAU-C11XHR$; " 
PSETCX+8, V), 1 
PRAU-C11XER*; " 
PSET(X*16, Y>,1 
PRAH-C11XNR*; " 
PSEHX + 24, V>,1 
PRAU-C11XUR*; " 
X-88 
V-70 

REN 

REN AFFICHAGE ANGLAIS-FRANCAIS 

REN - 

PSET(X, Vtl),l 
PRAU"C7XARI; " 
PSET(X*8,Y),1 
PRAU"C7XNR«; " 
PSET(X+17, Y),l 
PRAU"C7XGRt, " 
PSET(X*24, V),l 
PRAU"C"XLR», " 
PSET(X+32, V+l), 1 
PRAU"C7XAR»; " 
PSET(X+48, Y),l 
PRAU"C7XIR»J " 
PSET(X+47, Y),l 
PRAU"C7XSR*; " 
PSET(X+55, V),l 
PRINT#1, " -" 
PSET(X*64, Y>,1 
PRAU"C7XFR», " 
PSET(X+72, Y),l 
PRAU"C7XRR»; ■ 
PSET(X+88, Y+1>,1 
PRAU"C7XAR$; " 
PSET(X+88, V),l 
PRAU"C7XNR$, " 
PSET(X»96,V*1),1 
PRAU-C7XCR*; " 
PSET(X-H84,Y + 1),1 
PRAU"C7XAR»; " 
PSET(X+112, V>,1 
PRAH"C7XIR$; " 
PSET(X+119, Y>,1 
PRAU"C7XSR$; " 
X-80 
V-90 

REN 

REN AFFICHAGE FRANCAIS-ANGLAIS 

REM 

PSET(X,V),1 
PRAU"C7XFR», " 
PSET(X+8, V),l 
PRAU"C7XRR$; " 
PSET<X*16,Y*1>,1 
tRBWC7XAR$;" 
PSET(X+24,Y>,1 
PRAU"C7XNR»; • 
PSET(X+32,V*1),1 
PRAU"C7XCR»; " 
PSETCX+4B,Y+1>,1 
PRAU"C7XAR»; " 
PSET(X*48,Y>,1 
PRAU-C7XIR*; " 
PSET(X+55,Y>,1 
PRAU"C7XSR»; " 



2488 

2418 
2428 
2438 
2448 
2458 
2468 
2470 
2488 
2490 
2508 
2518 
2520 
2538 
2548 
2558 
2568 
2578 
2588 
2598 
2688 
2610 
2628 
2638 
2648 
2658 
2668 
2678 
2688 
2698 
2788 
2718 
2728 
2738 
2748 
2758 
2768 
2770 
2788 
2790 
2888 
2818 
2828 
2838 
2848 
2858 
2860 
2870 
2888 
2898 
2900 
2910 
2929 
2930 
2940 
2950 
2960 
2970 
2980 
2990 
3000 
3810 
3028 

3030 
OSUB 
3048 
3050 
GOSU 
3060 
3070 
GOSU 
3080 
3090 
3100 
3110 
3120 
3130 
3140 
3150 
3160 
3170 
3180 
3190 
3200 
3210 



PSET(X+62, Y),l 
PRINTtl, " ." 
PSET(X*T2,Y+1>,1 
PRAH"C7XAR»; ■ 
PSET(X*80,V),1 
PRAU"C7XNR«; " 
PSET(X*89,V),1 
PRAU"C7XGR»; " 
PSET(X*96, V),l 
PRAU-C7XLR*; " 
PSET(X*184,V+1),1 
PRAU"C7XAR«; " 
PSET(X*112,V),1 
PRAU-C7XIR*; " 
PSET(X+119,V>,1 
PRAU"C7XSR»; " 
X-83 
V-118 

REN 

REN - AFFICHA8E AUTO-TRAVAIL 

REN 

PSET(X-3,Y*1),1 
PRAU-C7XAR*; " 
PSET(Xt3,Y),l 
»RAH"C7XURf : • 
PSET(X*13, V),l 
PRAH-C7XTR*; " 
PSET(X+22, V),l 
PRAU-C7XR0*; " 
PSET(X*31, V),l 
PRINTtl, ■ -" 
PSET(X*48,V),1 
PRAH"C7XTR«; " 
PSET(X*48,Y>,1 
PRAU"C7XRR«; " 
PSET(X+56, Y+1>,1 
PRAU-C7XAR*, " 
PSET(X*64, Y>,1 
PRAH"C7XRV»i " 
PSET(X*72, V*l),l 
PRAU"C7XAR*; " 
PSET(X»88, V),l 
PRAU"C7XIR»; ■ 
PSET(X+86, Y),l 
PRAU"C7XLR»i " 
PSET(88,138),1 
PRAU"C7XFR$; " 
PSET(88,138>,1 
PRAU"C7XIRI, " 
PSET(94,130),1 
PRAU"C7XNR»; " 
Y-68: T=l 

REM 

REM - CHOIX PE L' OPTION 

REM 

AI-INKEYI 

IF A*-" " THEN GOTO 3030 

IF A»=CHRf(31) THEN 



T=Ttl Y-Y+20 
IF AI-CHRJC38) THEN T-T-l:Y«Y-28 
IF Y>138 THEN T-T-1:Y-128 
IF V<64 THEN T=T+1:Y=68 
PUT SPRITE 5,(68,Y>,9,5 
GOTO 2950 

IF T=3 THEN C0L0R1 , 1 , 1 : SCREEN8 G 
7B78ELSE3850 

COLOR 2.1G0T0 4210 

IF T-l THEN COLOR 1, 1 , 1 : SCREENS 
B7870ELSE3070 

COLOR 2,1G0T0 3220 

IF T-2 THEN COLOR 1 , 1 , 1 : SCREEN0 : 
B7070 ELSE 3898 

COLOR 2,1,1G0T0 3748 

PUT SPRITE 5, (8,0), 1,5 

REM 

REN - ROUTINE FIN 

REM 

COLOR 2,1 

SCREEN 8 

COLOR 1,1,1 

PEFUSR-&HC9 

POKE &HF3PE,100 

L=USR(0> 

COLOR 2,1,1 

ENP 

SOSUB 7070 

A SUIVRE... 
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FORMATION A 
L'ASSEMBLEUR PRATIQUE 



LA REVOLUTION CONTINUE ! 

Les micros, ci-apres nommes, onl 
deja herit* d'un nombre de cpurs 
consequents dans les numeros ci- 
dessous decrlts. 

ZX 81 - 55 56 61 66 71 76 81 86 

9195100105110114118122126 

130 

COMMODORE -» 60 65 70 75 80 85 



90 95 99 104 109 114 118 122 126 
130 

ORIC -. 57 62 67 72 77 82 87 92 96 
101 106 111 115 119 123 128 
AMSTRAD- 111 115119123127 
APPLE - 58 63 68 73 78 83 88 93 
97 102 107 112 116 120 124 128 
SPECTRUM - 112 116 120 124 127 
THOMSON - 59 64 69 74 79 84 89 
93 98 103108113117121 125129 
MSX- 113 117 121 125 129 



LANGAGE MACHINE SUR 
ORIC 



ARTICLE 

Inutile de dire que je m'excuse 
aupres des lecteurs qui ne me lisent 
plus depuis longtemps et qui done 
ne sauront pas que je m'excuse de 
commencer ce cours par quelques 
mises au point. 

MISE AU POINT 

Profitant de la puissance de leur 
groups de presse (ils totalisent a eux 
deux au moins la moitie des articles 
de votre journal tavori ce qui est 
contraire a la loi contre les monopo- 
les de la presse. Inutile de vous dire 
qu'ils beneficient de I'immunite par 
le menteur, je veux dire a cause de 
leur mauvaise foi permanente et 
latente, qui n'est pas mon oncle, 
encore moins binocle, que j'ai oublie 
sur la porte de petit chat qu'il va fal- 
loir allaiter d'oreiller ne m'en parlez 
pas dans le noir me font froid dans 
le dos, minot que tu es le pere et 
coucher avec la mere patrie je ne 
sais pas oil on va comme ca), Milou 
et Escapeneufge ont lachement 
tente d'etouffer les minorites dont je 
suis. C'est un scandale. J'ai utilise 
la voie democratique pour me faire 
entendre, je vais desormais procd- 
der par attentats anonymes et pures 
catomnies. Ces salauds sont juste 
capables de dilapider I'hermitage 
que m'a laisse tonton. Mon slogan 
sera : Milou je te hais, Escape- 
neufge taille-toi. 



DEBUT EFFECTIF DE L'ARTICLE « fc " 



Nous avions la derniere fois fait a 
peu pres le tour des magouilles sur 
la pile. J 'en ai marre de parte r de la 
pile, parlons done des interruptions. 
Ouadsdat, les interruptions ? 
Aillexplaigne, avec un exemple tire 
de la vie de tous les jours, exemple 
que j'ai lu je ne sais oil. 



Vous etes en train d'ecrire un arti- 
cle, Milou vous telephone, vous le 
traitez de superradasse au Pluto- 
nium (il reste sans voix devant une 
telle haine), puis vous raccrochez et 
reprenez I'ecriture de I'article ou jus- 
tement vous etiez en train d'expli- 
quer le fonctionnement des interrup- 
tions ce qui vous a d'ailleurs donne 
I'idee d'utiliser cet exemple vecu. 
Ce petit recit, d'apparence bien ano- 
dine, resume tres bien, en fait, les 
different* ingredients (la parabole 
de la cuisine fait toujours un effet 
besuf) du fonctionnement du 
microprocesseur. 
Mettons que vous etes le 6502. 
Vous executez votre tache princi- 
pale qui est d'ecrire un article. Votre 
contexte, c'est la feuille et votre 
stylo. 

MONO I 

Le telephone sonne (c'est d'ailleurs 
la premiere fois depuis 10 ans qu'on 
vous telephone alors que vous etes 
ailleurs que sous la douche ou au 




lit). La sonnerie, c'est le signal de 
I'interruption. Vous finissez le mot 
que vous etiez en train d'ecrire, 
posez le stylo et decrochez le tele- 
phone (et vous etes glace d'horreur 



a cause de la voix mielleuse de 
Milou, mais la n'est pas le 
problems). 

Ecrire un mot, c'est, mettons, exe- 
cutor une instruction du 6502. Le 
signal d'interruption n'est en effet 
teste par le processeur qu'a la fin 
d'une instruction. 
Vous avez pose le stylo a un endroit 
ou vous saurez le retrouver. Ca 
s'appelle sauvegarder le contexte. 
Votre contexte c'est la feuille et le 
stylo. II etait inutile de ranger la 
feuille, puisque le fait de decrocher 
le telephone n'est pas incompatible 
avec le fait de laisser une feuille sur 
le bureau. 

Puis, vous avez "servi" I'interrup- 
tion (en I'occurrence, insulter 
copieusement Milou), enfin vous 
etes sorti de I'interruption et vous 
avez recupere le contexte, e'est-a- 
dire repris le stylo ou il etait pose. 

EOIFI ANT, NON ? 

Cet exemple reunit done les princi- 
pales phases d'une interruption : 
(les esprits vifs auront remarque 
qu'il est inutile de poser le crayon 
puisqu'on peut tres bien prendre le 
combine telephonique avec I'autre 
main. Je precise done que I'autre 
main etait occupee a chercher sur 
le tuner une station FM qui passe 
autre chose que de la musique nulle 
24 heures sur 24 et etait done indis- 
ponible depuis longtemps). 
-Les boftiers peripheriques emettent 
une demande d'interruption en met 
tant a I'etat bas la ligne nommee 
IRQ. 

-Le 6502 termine I'instruction en 
cours ce qui peut prendre de a 7 
microsecondes, teste I'etat bas, il 
verifie que les interruptions sont 
bien autorisees (drapeau I sur regis- 
tre d'etat). Si non, il ne s'est rien 
passe. Si oui, il se branche a 
I'adresse contenue en fl FFFE- It 
FFFF. 

II faut sauver le contexte pour pou- 
voir reprendre la tache principale 
sans problems. Cette sauvegarde 
est en partie executes par le 6502 
lui-meme puisqu'il sauve au som- 



met de la pile I'adresse de son poin- 
teur de programme (poids fort puis 
poids faible) ainsi que le registre 
d'etat. 

Le reste des sauvegardes doit etre 
assume par le programme de ser- 
vice des interruptions. Tout ce qui 
est modifie par le programme 
d'interruption doit etre soil reserve 



EXEMPLE 

Avant d'aller plus loin, voyons un 
exemple. Voici le listing comment* 
d'un deuligne paru il y a peu de 
temps : il affiche a I'ecran, "cong I" 
chaque fois que vous pressez return 
ce qui est, ma foi, tres drole 

FI9I 



100 


' 








110 


■ 


ORG 


*97D0 




120 


• 








130 


•detirb: 


PHA 




isauver le registre A 


140 


• 


l-DA 


»02DF 


{lire clavier 


150 


■ 


CMP 


**80+0D 


JReturn ? 


160 


■ 


BNE 


30RIRS 


iron, ok 


170 


• 


TXA 






180 


• 


PHA 






190 


■ 


TYA 






195 


■ 


PHA 




i sauver X et Y 


200 


■ 


LDX 


**F9 




210 


" 


LDY 


*0269 


t prendre coor donnee c 


220 


■loop: 


INY 






230 


* 


LDA 


MESSAG-F9 ; ere ire le message 


243 


" 


STA 


(«12) ,Y 


i a 1 ' ecran 


250 


" 


I NX 






260 


" 


BNE 


LOOP 




270 


■ 


PLA 






280 


■ 


TAY 






290 


" 


PLA 






300 


" 


TAX 




Jrecuperer X et Y 


310 


' 








320 


"SOR1RQ: 


PLA 




let A 


330 


" 


RTI 






340 


1 








350 


"MESSAG: 


ASC 


,C0NG 





a la seule gestion des interruptions 
soit sauve au debut et recupere a 
la fin. 

Dans un but d'optimisation et par 
dart*, il est conseill* de ne sauver 
que le strict necessaire (rappelez- 
vous, la feuille de papier n'a pas et* 
ran gee). 

En general, les registres A.X, Y sont 
modifies plus eventuellement quel- 
ques variables systems. 
- Une fois le contexte sauve, il con- 
vient d'executer le programme 
d'interruption. Recuperons le con- 
texte que nous avions sauve. La 
recuperation de PC et de P est autc- 
matique par r execution de I'instruc- 
tion RTI (ReTum from Interupt). 



(NB : pour brancher la routine, faire 
DOKE It N 254 ( H 229). t 97D0 : 
POKE 8 24A ( 3 230), 76, entre 
parentheses pour la V1 .0) 
Tout d'abord, notons une astuce 
dans la boucle : pour eviter un CPX 
quelconque pour sortir de la boucle, 
on decale I'index et la valeur de 
base de MESSAG ce qui permet de 
sortir quand X - 0. Ceci impose de 
connaltre a priori la longueur de la 
boucle et n'est done pas toujours 
applicable. 

Done, on sauve tout de suite A qui 
est utilise a coup sur et on teste si 
I'utilisateur a bien presse Return. 
Non, on recupere A et on sort de 
f IRQ illico presto. 



Si c'est bien Return, on sauve X et 
Y qui sont utilises et on ecrit le mes- 
sage (tres drole et raffine, putaing I). 
On recupere le tout et on se casse. 
C'etait votre premiere routine 
d'interruption. Instructive et (tres, 
tree) drole. Sincere* conakMra- 



Attardons-nous sur des considera- 
tion theoriques. C'est la notion 
d'interruption qui permet d'avoir 
i'impression qu'un ordinateur exe- 
cute plusieurs taches. Par exemple, 
sur I'Oric, on a 1'illusion que la ges- 
tion du clavier est faite en mime 
temps que I'execution du pro- 
gramme : c'est faux. 
A un instant donna, un processeur 
n'execute qu'une seule tache. Le 
clavier etant gere 100 fois par 
seconds, a I'echelle humaine, on 
n'est pas capable de s'en aperce- 
voir puisqu'on ne peut (rapper au 
maximum que 20 ou 30 caracteres 
par seconds 

En revanche, a I'echelle de la 
Vitesse du 6502 qui execute environ 
30.000 instructions par seconds, il 
se passe environ 3000 instructions 
entre chaque pression de touche. 
Bien entendu, une interruption 
ralentit le programme principal. 
Supposons qu'une interruption soit 
generee 100 fois par seconde et 
qu'elle necessite 1 ,8 milliseconds 
Pendant une seconde (1000 ms), le 
6502 va passer 1,8*100- 180 ms 
de son temps a executer I'interrup- 
tion et done a ne pas executer le 
programme principal. Le 6502 1'exe- 
cute done a environ 82% de sa 
Vitesse maximale. Dur I 

ET C'EST LA FIN I 

Voila, c'est fini pour cette fois. Juste 
la place pour une derniere calom- 
nie a Milou et Escapeneufge : cen- 
sure. (NDLA : il n'y a eu aucune 
NDLA cette fois, etonnant I) (NDLR : 
T'vas voir ta gueule a la sortie I). 

Fabrice Broche 

Alias Milou 

Alias Esc9G 

Alias Le Megalo 



LANGAGE MACHINE SUR 
AMSTRAD 



A L'ATTAQUE DU JEU DES- 
TRUCTIONS 

Les choses veritablement serieuses 
vont commencer avec ce cours, 
serieuses ne voulant pas dire diffi- 
ciles. C'est le moment de detainer 
le jeu destructions du Z80, et il ne 
comprend pas moins de 694 pieces. 
Cet ensemble peut se diviser en 
groupes d'instructions et, quand on 
en a assimile une, les autres du 
meme groupe ne posent aucun pro- 
bleme de comprehension. Apres 
avoir divise le jeu d'instructions du 
Z80 en dix families, attaquons 
aujourd'hui la premiere d'entre 
elles. 



INSTRUCTIONS DE TRANSFERT 



Ce sont les plus nombreuses et les 
plus faciles a comprendre. Elles ser- 
vent a transferer une ou plusieurs 
donnees d'un endroit a un autre. 
Leur mnemonique, que vous placez 
dans le champ operations (ceux qui, 
le mois dernier, n'ont pas dormi au 
fond de la classe pres du radiateur 
s'en souviennent !), est presque tou- 
jours LO diminutif de LOAD qui 
signifie charger dans la langue de 
Maggy. Dans le champ operandes 
on met 2 trues separes par une vir- 
gule. Le premier true indique la des- 
tination et le deuxieme la source. 
Mais qu'est-ce que c'est que ces 
trues ? Voici la reponse. 

1 . Registre (simple ou double) 

A, B, C, D, E, H, L, HL, DE, BC, IX, 

IY, SP 

Exemple : LD A,L 



2. Le contenti d'une adreeae poln- 
tee par un double registre 

(HL), (DE), (BC), (IX + IND), 

(IY + IND) 

Exemple : LD B,(HL) 

3. Le contenu d'une 



( S 8000), LABEL 

Exemple : LD HL,( It 8000) 

4. Una valeur hurt ou seize bits 

II 4F, 8 4C0F 

Exemple : LD DE, It 5000 

Malheureusement, toutes les com- 
binaisons ne sont pas possibles. Si 
LD A,(DE) est correct, en revanche 
LD B,(DE) ne Test pas. II est done 
necessaire (voire indispensable) de 
posseder une liste complete des ins- 
tructions Z80, que Ton trouve dans 
tous les livres ecrits autour de ce 
microprocesseur, et de connaltre 
quelques principes de base. 

1 . Toutes les cornbinaisons de regis- 
tre simple a registre simple sont 
possibles. Ce qui nous donne deja 
49 instructions. 

Exemple : LD A,B; LD B,D; LD H,E; 
LD L,D; etc. 

2. Seul le contenu d'une adresse 
pointee par les doubles registres 
HL, IX et IY peut etre transfer* dans 
n'importe quel registre simple et 
inversement. 

Exemple : LD D,(HL); LD C,(HL); LD 
(HL),E; LD (HL),A; etc. Les registres 
d'index IX et IY seront examines 
plus loin. 

3. Le contenu d'une adresse poin- 
tee par les doubles registres DE et 



BC ne peut etre transfer* que dans 
I'accumulateur et reciproquement. 
Exemple : LD A,(DE); LD (BC),A 

4. Meme principe pour le contenu 
d'une adresse. 

Exemple : LD A,( 8 65CD); LD ( g 
ED67),A 

5. Une donnee huit bits peut etre 
transferee dans n'importe quel 
registre simple. 

Exemple : LD A, It 34; LD E, It 56; 
LDC, 8 EF 

6. Ou par I'intermediaire d'un dou- 
ble registre, mais uniquement HL, 
IX ou IY. 

Exemple : LD (HL), K 23 est Der- 
mis, LD (DE), I FF est interdit. 

7. Mais jamais dans une adresse 
directement ! 

Exemple : LD ( It 7000), II 34 est 

formellement interdit. 

8. Une donnee seize bits ne peut 
etre charges que dans un double 
registre. 

Exemple : LD HL, 8 34EF; LD DE, 
H E34A; LD BC, 8 1E38; etc. 

9. Le contenu de deux adresses 
peut etre transfere dans un double 
registre et inversement (ce qui cor- 
respond a une donnee seize bits). 
Exemple : LD DE,( 9 30E0) 
Cette derniere instruction corres- 
pond a la sequence : 

LD A,( g 30E0) 

LDE.A 

LDA,( S 30E1) 

LDD.A 

Le contenu de 8 30E0 va dans E 

et celui de It 30E1 dans D. 

Sachez encore que toute paren- 
these signifie contenu d'une 
adresse. Elle peut etre directe ( 8 



8000) ou pointee par un double 
registre (HL). Et souvenez-vous defi- 
nitivement que le second operands 
va dans le premier. Quand vous 
aurez assimile ces quelques princi- 
pes de base concernant les instruc- 
tions de transfert et de chargement, 
vous connaltrez deja la majorite des 
instructions Z80. Pour terminer avec 
cette famille, il nous faut encore 
aborder les transferts de blocs, les 
echanges de registres et les regis- 
tres d'index. Commencons par ces 
derniers. 



LES REGISTRES D'INDEX IX ET IY 

On peut faire avec eux tout ce que 
Ton peut faire avec la paire de regis- 
tres HL II faut y ajouter un avantage 
et deux inconvenients, mais chacun 
a son role. Et le role de ces deux 
registres-la est de permettre I'adres- 
sage Index*. Nous avons vu que 
Ton pouvait transferer dans 
n'importe quel registre simple le 
contenu d'une adresse pointee par 
le double registre HL, avec les dou- 
bles registres IX et IY, nous pouvons 
y ajouter un index ou, si vous pre- 
ferez, un nombre a ajouter ou a 
deduire de I'adresse. Mais 
exemplons I 

EX: L0 HL,#8000 

LD A,(HL) 

LD HL,#B010 

LD E,(HL) 

LD HL,#7FF0 

LD D,( HL) 

equivaut a 

LD IX, #8000 

LD A,( IX+#00) 

LD E,( IX + 010) 

LD D,( IX-#10) 



N'est-ce pas suffisamment clair 7 Le 
microprocesseur ajoute a la donnee 
seize bits, contenue dans le double 
registre IX ou IY, I'index huit bits 
precise dans I'instruction. II prend 
en compte ce resultat et non plus la 
valeur simple du double registre. 
Les inconvenients sont le temps 
d'execution et la place memoire. En 
effet I'instruction LO A,(HL) ne 
prend que 7 cycles d'horloge alors 
que LD A,(IX + ind) prend 19 cycles. 



Parenthese : avec les Amstrad, le 
temps reel s'obtient en divisant le 
nombre de cycles par 4, soit 1,75 
microseconde pour 7 cycles. 

Vous serez toujours fascine par les 
temps d'execution. Pour vous don- 
ner un ordre d'idees, sachez que le 
microprocesseur peut executer un 
million de LD A,B a la seconde ! La 
place memoire varie de 1 a 3 : un 
octet pour LD A,(HL) et trois octets 
pour LD A,(IX + ind). Pour conclure, 
nous dirons que les registres 
d'index sont tres utiles dans des cas 
specifiques. 

ib org Daeee 

20 LD HL,#BBBB 

30 LD 0E,#CBBB 

4B LO BC,*3FFF 

50 LDIA 

60 RET 

LES TRANSFERTS DE BLOC 
(LDO, LDI, LDDR, LOIR) 

Ces quatre instructions sont de peti- 
tes merveilles ! Elles permettent de 
deplacer, en une seule fois, un bloc 
allant jusqu'a 64 Ko I Le D, place 
apres un LD, signifie diciimeniet 
et le I, incrimenter. Le R signifie 
r6p6ter jusqu'a ce que le double 
registre BC soit a zero. . 



LDD prend le contenu de 
ladrssse pointee par HL, le 
transfere dans I'adresse 
pointee par DE, decre- 
ments HL et DE, decre- 
ments BC 

LDI prend le contenu de 
I'adresse pointee par HL, le 
transfere dans I'adresse 
pointee par DE, incremente 
HL et DE, decremente BC 

LDDR prend le contenu de 
I'adrosse pointee par HL, le 
transfere dans I'adresse 
pointee par DE, decre- 
mente HL et DE, decre- 
mente BC et recommence 
jusqu'a BC-0 

LDIR prend le contenu de 
I'adresse pointee par HL, le 
transfere dans I'adresse 
pointee par DE, incremente 
HL et DE, decremente BC 
et recommence jusqu'a 
BC-0 

Chargez votre assembleur 
prefer* et essayez ceci. 

; On commence en BBDB 

lAdresse source 

iAdresse destination ( ecron) 

; Longueur du bloc 

; Transfert 

;Et c'est finil 

RECREATION 

Pour les quatre cent soixante- 
quatrards seulement : 

CALL &BD3A 

Et amusez-vous bien les enfants I 

Patrick Dublanchet 
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MARIAGES 



LE PISTONNE 

Un titre pareil 

merite un 

traitement de faveur. 

Le film de 

C. Berri (1970) 

vaut surtout 



•.•x&^EN DEROIT E #x-:-^^ Pour la prestation 

de Guy Bedos. 

Lundi 21 a 

20h35 sur FR3. 



MADAME PORTE LA CULOTTE 



Film de G. Cukor (1949) avec Spencer 
Tracy, Katharine Hepburn, Judy Holiday 
et Tom Ewell. 

Adam Bonner (Tracy), procureur, et sa 
femme Amanda (Hepburn), avocate de 
renom s'aiment tendrement depuis des 
annees. Le cas Doris Attinger (Holiday) va 
empoisonner leur vie, Adam ('accusant de 
meurtre au nom de I'etat et Amanda la 
defendant de I' autre cote du pretoire. La 
presse s'empare de I' affaire, le proces y 
gagne en publicite mais les relations du 
couple s'enveniment. L'innocence de la 
pauvre Doris passe au second plan, le pro- 
ces tourne a la querelle de menage. 

A force de roueries feminines, Amanda 
embobine le jury (fait minime) et obtient 
racquittement de la prevenue (fee Maxim). 
Hors de lui, ridiculise, Adam Bonner 
(d'ane) se fache avec Amanda. Son 
amour-propre I'emporte sur son amour tout 
court. 

Excellente comedie de Cukor, un ton au- 
dessous quand meme de celle de la 
semaine precedente. Pour la petite his- 
toire, Tracy et Hepburn s'aimaient depuis 
10 ans mais Spencer refusait de divorcer 
pour ne pas faire de peine a sa femme. 
Revees ou vecues, ces scenes de mena- 
ges ne manquent pas de sel. 

Diffusion le vendredl 25 a 23h00 sur A2 
en V.O. 

L'AMI MAUPASSANT : BERTHE 

Serie de Claude Santelli avec Marie- 
Christine Barrault, Michel Duchaussoy, 
Pierre Vernier, Michel Aumont et Laure 



mand. Therese (Barrault) et Paul (Vernier) 
de la Vallee cachent au fond de leur pro- 
vince leur misere affective. Peu verni, mal 
barre, le couple dissimule Berthe, leur 
enfant, jolie damoiselle de 15 ans comple- 
tement debile 




Henri (Duchaussoy), medecin parisien 
mais seducteur tout terrain, rend visite a 
de vagues cousins dans leur chateau nor- 



Henri s'occupe d'elle. II la choie, la cajole, 
tente de la sociabiliser. Sans resultats. II 
reussit beaucoup mieux avec la mere qui 
repond avec ferveur a ses tendres atten- 
tions. Et si la maternite rendait Berthe intel- 
ligente ? Vite fait, on trouve un coureur de 
dot pas difficile. Helas, le gendre se revele 
etre une brute qui la rend completement 
telle. 

Encore une fois, Santelli capte a merveille 
la sensibility de Maupassant qu'il nous 
retransmet tres fidelement. 

Diffusion le mercredl 23 a 20h35 sur 

TF1. 

Photo TF1-C. James 



FRENESIES 
SEXUELLES 

DU SANG POUR DRACULA 



Film de Paul Morrissey (1973) avec Joe 
Dalessandro, Vlttorio de Slca et Udo 
Kler. 

Le comte Dracula se carapate hors des 
Carpathes, faute de vierges pour son elixir 
de vie. En cette fin du XX* siecle, seule 
I'ltalie, patrie du pape, conserve dans la 
bigoterie ce genre de peronnelle. 
Dracula, accompagne de son lit cercueil 
et de son serviteur. impressionne favore- 
blement une famille noble mais ruinee. Le 
marquis (De sica) a justement quatre fil- 
les a marier, qu'il affirme vierge bien 
entendu, et qu'il pousse dans les bras du 
comte. Las, le sang des deux alnees rend 
malade le pauvre comte par faute de trom- 
perie sur la marchandise. II en est reduit 
a laper le sang de la cadette qui vient juste 
d'etre violee. 

Morrissey et Dalessandro s'offrent une his- 
toire traditionnelle, une photo et des 
decors des plus classiques pour mieux les 
contourner. Delire baroque mais leche, 
ejaculation d'hemoglobine, diarrhee ver- 
bale. Resultat : un summum d'horreur pos- 
tiche oil un summum du pastiche selon les 
mauvais gouts. 

Diffusion le samedl 26 a 23hOO sur C + 
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ECHANGES 
EST-OUEST 



L'HOMME DE BERLIN 

Film de Carol Reed (1953) avec James 
Mason, Claire Bloom et HlkJegarde Neef. 

Dans Berlin, capitate touristique de I'apres- 
guerre, Susan Malison (Bloom) vient pas- 
ser ses vacances aupres de son frere, 
medecin militaire, marie a une allemande. 
La germaine qui s'appelle Bettina (Neef) 
se montre particulierement nerveuse car 
son premier man vient de reapparattre 
alors quelle se croyait veuve. Ivo Kern, tel 
est son nom, vit a Berlin-Est ou il se livre 
au marche noir chez les rouges. 

Ivo, soumis a un chantage, s.'engage a 
livrer le responsable d'une filiere de pas- 
sage a I'ouest. II oblige Bettina a I'aider. 
De plus Ivo Kem, qui aime les pepins (bla- 
gue pour germane-phones) seduit Susan, 
qui est toute gentillesse et toute inno- 
cence. Lorsque cette derniere se fait enle- 
ver, il la recherche desesperement. 

Un film d'actualite a I'epoque de la guerre 
froide. Tres inspire par les villes frontieres, 
par les lieux de passage, Reed traite a nou- 
veau le theme de la trahison et de sa 
redemption : la mort du traltre lorsqu'il 
redevient honnete. 



LE JEU DU FAUCON 

Rim de John Schlesinger (1984) avec 
Sean Penn, Timothy Hutton et Pat 
Hlngle. 

Chris Boyce (Hutton) et Daulton Lee (Penn) 
sont des amis inseparables depuis leur 
plus tendre enfance. A 23 ans, leurs vies 
ont pourtant serieusement diverge : Boyce 



a renonce a la pretrise pour occuper un 
poste important dans une firme d'electro- 
nique, Lee a renonce au coca- cola pour 
plonger dans la dope , consommation et 
vente. 

Comme il a toujours besoin d'argent, lors- 
que Daulton lit dans la presse la fonction 
strategique de son vieux pote Chris, il le 



Tout marche bien, lorsque Daulton, se pre- 
nant pour les Dalton, se lance en plus dans 
le trafic de drogue. 

A partir d'une histoire vraie qui fit les choux 
gras de la presse americaine au milieu des 
annees 70, Schlesinger retrace avec minu- 
tie la vie de ces deux espions pas ordinai- 
res. Mi-thriller, mi-comedie noire, le film 




persuade de vendre les renseignements 
auxquels il a acces. Chris refuse car le seul 
acheteur potentiel est I' Union Sovietique, 
dit le grand Satan. Mais ecceure par les 
actions de la CIA (meurtres, coup d'Etat. ..), 
il s'y resout. 



conte leurs aventures extraordinaires de 
banalite, du fait de i'incompetence respec- 
tive de la CIA et du KGB. 

Diffusion le dimanche 27 a 18h00 sur 
Canal + 




FRENZY 

Rim d' Alfred Hitchcock (1972) avec Jon 
Finch, Alec McCowen, Barry Foster et 
Barbara Leigh-Hunt. 

Au bord de la Tamise, un official prononce 
un discours ecologique lorsque au fil de 
I'eau passe un cadavre avec une cravate 
en guise de maillot de bain. L'intrusion de 
ce corps etranger a la ceremonie est 
excessivement shocking car elle revele 
que a) la Tamise est mal tamisee b) que 
certains la confondent avec un depot 
a" ordures, c) que les detritus, necessaires 
au cycle de la nature, afferent, en ce cas 
present, les efforts deployes par la muni- 
cipalite, d) que le baigneur ne respects pas 
1) I'interdiction de faire trempette 2) la 
decence car si I'usage de la cravate est 
facultatif celui du maillot est obligatoire, e) 
que I'anatomie, qui verifiant le theoreme 
d'Archimede recoit de la tamise une pous- 
see lui permettant de Hotter, est de sexe. . . 
FEMININ. 

Encore une femme strangles et violee par 
un maniaque de la cravate. Au Globe, le 
pub du coin, les consommateurs prati- 



quent la mise en biere de I'information 
(cadavre qui mousse amasse commentai- 
res). Le serveur Richard Blaney (Finch) se 
dispute avec Forsythe, le patron du pub, 
embrasse son amie Babs (Leigh-Hunt), la 
barmaid et s'en va rejoindre son copain, 
Bob Rusk (Foster), marchand de fruits de 
son etat, puis va voir son ex-femme, 
Brenda pour lui annoncer son licencie- 
ment. 

Apres avoir dormi a I'Armee du Salut, 
Richard retrouve Babs dans une chambre 
d'hdtel. Lorsqu'il apprend la mort de 
Brenda, il se cache chez des amis pendant 
que Babs enquete. Las, Babs se fait cra- 
vater par le sadique. Et Richard epingle 
(sans cravate) par Scotland Yard. 

Pour son 52" film, Hitchcock reussit encore 
a etonner les cinephiles, a choquer le 
grand public, a affrayer le petit peuple des 
salles obscures. L'assassin est des plus 
sympathique au demeurant, excepte le fait 
qu'il a besoin de tuer pour eprouver 
I'orgasme (gasp !). Le dernier chef 
d'esuvre du pere Alfred. 

Diffusion le jeudl 24 avril a 20h35 sur 
FR3. 
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JUSTICE 
POUR TOUS 



L'INCONNU 



Film de R. Thorpe (1951) avec Walter 
Pidgeon, Ann Harding et Barry Sullivan. 

Bradley Masen, celebre avocat du barreau, 
defend Rudi Wallchek, accuse de meur- 
tre. Apres avoir obtenu sa liberation des 
barreaux (Rudi : " v'la le cheque "), il rea- 
lise que son client appartient au syndicat 
du crime. 

Furieux car tres probe sur lui, cet obsede 
de justice, enquete et rencontre un des 
chefs du syndicat, Andrew Layford aupres 
duquel il se fait passer pour le chef 
supreme de la mafia, le mysterieux UN- 
KNOWN. Ulcere par la desinvolture de 
Layford vis-a-vis de la Justice et des hon- 
n&tes gens, Masen le trucide avec le revol- 
ver de Wallchek. Comme de juste Wall- 
chek est inculpe et condamne. 

Diffusion le dimanche 27 a 22h30 sur 
FR3 en V.O. 



LA NUIT DU FLINGUEUR 

Serle Noire de Pierre Grimblat d'apres 
un roman Pierre Sinlac avec Victor 
Lanoux, Veronique Geneat, Lazlo 
Szabo, Jean-Marie Riviere, Patricia Mil- 
lardet, et Philippe Polet. 

Kant (Lanoux) perce les coffres-forts en 
philosophe misanthrope. Lors d'un casse, 
il est blesse par un de ses complices qui 
essayait de le tuer. Soigne a I'hopital peni- 
tentiaire, il recueille la confession d'un 
vieux truand qui a dissimule 300 kilos d'or. 
II lui donne le code mais seule Marlene, 
I'infirmiere de garde a entendu r emplace- 
ment. Obliges de s'entendre, Marlene (tou- 
jours aussi belle plante, la Genest) aide 




Kant a s'enfuir malgre I'irruption d'un tueur 
a gages qu'ils envoient ad patres. 

Pendant que Marlene effectue une recon- 
naissance aurifere, deux affreux , Paco et 
Carton (le tueur qui rate toujours sa cible), 
rodent autour de la cache de Kant. Ce der- 
nier s'en sort grace a Marlene, encore une 
fois. Estomaque, Kant, reste jusqu'ici sur 
son Kant-a soi vis-a-vis de Marlene, lui 
donne son corps et reste sur son quant-a- 
soi vis a vis des tueurs, passe a I'attaque. 
II va se faire un Carton. 

La meilleure Serie Noire depuis bien long- 
temps; un souffle nouveau dans cette saga 
qui s'enlisait dans la surenchere sangui- 
violente. Pierre Grimblat, sumomme Papy, 
vieux routier de la tele, demontre une fois 
de plus sa maitrise eblouissante dans Cart 
du cadrage, le rythme de Taction et le 
choix du casting (parfait). Un film tres mou- 
vemente, axe sur un tresor plus une ven- 
geance, avec une femme fatale, un sourd- 
muet, une dejantee, des references paro- 
diques au monde du polar et j'en oublie 
et des biens bonnes. 

Diffusion le samedl 26 a 20h30 sur TF1 . 
Photo TF1-C. Chevalier 
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LE LOGICIELDE LA SEMAINE 



SPIRIT OF THE STONES 

de Commodore Computer 
pour C64 



II y a deux trues interessants dans 
ce logiciel que je qualifiers: "de la 
semaine". Primo : e'est un soft 
techniquement fort bien realise. 
Deuxio : pour promouvoir la vente 
du programme, Commodore, pour 
une fois, a innove. Vous n'en croyez 
pas vos yeux, hein, et pourtant I 
Attendez un peu que je vous 
raconte I'histoire. 
En octobre 1983, quarante talis- 
mans en diamant ont ete caches 
quelque part sur I'ile de Wight (e'est 
en britiche, vous inquietez pas, d'ail- 
leurs ca date du temps des colonies 
comme tout ce qui est britiche et qui 
se respecte). Le plus gros d'entre 



eux, le "Great Wight Eye" fut ega- 
lement planque quelque part dans 
I 'He. Dans le livre de la taille d'une 
bande dessinee qui est donne avec 
le programme est cachee la proce- 
dure a adopter pour retrouver ces 
mysterieux joyaux. 
Pour ajouter du piment et de la 
valeur A votre plaisir, pour chaque 
logiciel vendu, Commodore a mis 
I 'equivalent de 5 francs dans une 
caisse dont le total reviendra a celui 
qui arrivere a denicher chacun de 
ces bijoux. Pas mai comme idee, 
non ? 

Bien sur, les symboles mystiques 
decrits dans le bouquin n'ont pas 



I'air franchement evidents a piger. 
C'est la que le soft entre en action. 
Apres le chargement, vous vous 
retrouvez devant un ecran represen- 
tant la carte de I He avec les habita- 
tions du coin : tours, moulins, fer- 
mes, etc. Dans chacune de ses 
habitations reside un ou plusieurs 
diamant garde par des fantomes et 
autres monstres qui vous desinte- 
greront rien qu'au toucher. 
Le jeu commence avec la pression 
sur le bouton de feu du manche a 
joie. Vous etes represent* par un 
petit bonhomme sur la carte et vous 
vous baladez en faisant scroller le 
decor, bref, vous voyagez sur une 
carte. Histoire de dire que vous vous 
essoufflez quand meme un peu, 
votre niveau d'energie psi (me 
demandez pas ce que c'est, j'en ai 
aucune idee) diminue a chaque fois 
que vous heurtez un loup-garou ou 
un scorpion putride. 
Pour vous permettre de decouvrir la 
signification des symboles, vous 




devez aller chercher tous les dia- 
mants en sachant que chacun 
d'entre eux vous aidera dans votre 
quete. A I'interieur des maisons et 
des tours, le decor n'est plus le 



meme. Certes les fantomes vous 
tournent toujours autour en vous 
jetant des poudres de periimpinpin 
qui vous font perdre de I'energie 
mais il existe toujours un chemin 
pour attraper 1'objet de votre convoi- 
tise. A chaque nouvelle maison, la 
strategic a adopter pour recuperer 
le diamant est plus compuquee. Une 
petite erreur dans le parcours et 
hop I Vous etes foutu. 
Vous vous deplacez vers la droite, 
la gauche, le haut et le bas. C'est 
a vous de trouver les bons passa- 
ges dans lesquels vous ne serez 
pas vulgairement elimine par un 
quelconque scolopendre glaireux. 
Le logiciel est vendu dans une 
grande bofte contenant le livre qui 
vous raconte I'histoire et dans lequel 
vous pouvez denicher un certain 
nombre de renseignements sur les 
symboles a dechiffrer, un mode 
d'emploi de 4 pages d'un immense 
format et une cassette. Un bon 
investissement en perspective. 



MENU 



AMSTRAD 


Catacombes 


Stephana vallois 


page 28 


AMSTRAD 


Fugitif 


Laurant BOUSQUET 


page 8 


APPLE 


Tron 


Yan CHRISTIEN 


page 5 


CANON X07 


Formula 1 


Alain FOUSSE 


page 26 


CSM 64 


Wiltor 


Emerich FRENANDES 


page 30 


■XL 100 


Pin Ball 


Daniel COCHAUX 


page6 


FX 702 P Marche en Bullant 


Xavier de BEAUCHESNE 


page 32 


MSX 


Time Pilote 


Philippe ILLOUL 

one 


page 31 

L'heritier 


Sylvain GAUTHIER 


page 25 


one 


Copieur-Pro 


Gragoire GEMPP 


page 10 


SPECTRUM 


Tenere 


Michel CHEVALIER 


page 4 


Tl M/4A (be) 


Ti Lode 


Sylvain PERUZZI 


page 27 


Thotraon T07-T07/70 Hebdo Runner 


J.M. MASSON 


page 9 


Thomon TO7/70-MO5 Masque Graille 


Yves KREICHER 


page7 


VIC 20 


Mission F15 


Thierry MARTIN 


page 3 


ZXS1 


Super Hot 


Eric LECHAUDEL 


page 29 




T-WKPU 





: 1 J j; i 


\$fe& 


W\^c 


""TXi \ \ 


?<m 




OH 





"BASIC ETENDU" 
40 commandes 
supplementaires 
indispensables 
pour une program- 
motion avancee. 
Manuel en lranpois.Accesaux32Ko.Gere les 
couleurs, les sprites, les peripheriqueseOO F D 



MINI-MEM0IRE 
Ce module ne se 
contents pas de 
vous otfrir 4 Ko de 
memoire RAM (ali- 
mentee par pile) 
permertant la sau- 
vegorde des pro- 
grammes el don- 
nees lorsque vous 
etergnez rordina- 
teur... 
II a aussi : 
• 4Kode memoire 
morte (ROM) et 
6 Ko de memoire 
morte graphique 
(G-R0M) conte- 
nant des utilltdires 
tres interressanls : 
-acces possible tl 
rextension 32 K en 
Tl basic; 

- changement de 
programmes objets 
ecrits en assem- 
bleur, soil sur mini- 
memoire, sort sur 
extension 32 K; 

- utilisation de 
PEEK et POKE, appel 
de sous-program- 
mes habituellement 
nonaccessibles; 

- progamme de re- 
cherche demurs 
(Easy Bug-De- 
bual). Le modele 
avec manuel -t-mo- 
nuel assembleur 
sur minl-memoire 

895FD 



MODULE BASIC 
SUPERGRAPH 
Un nouveau basic 
etendu avec 35 
tonctions supple- 
mentaires permer- 
tant de tracer li- 
gnes, cercles, Ellip- 
ses, axes, diagram 
mes en barres ou 
circulaires. Ce ba- 
sic graphique pre- 
sente2caracteristi- 
ques tres utiles : 
une copie tfecran, 
graphiaues et tex- 
tes (codes ASCII), 
vpoke et Vpeek ac- 
ces direct a la Ram 
de condole ecran, 
necessite la me- 
moire 32 Kou 128 K. 
Garde les tonctions 
du basic etendu 
dans son integralite. 
1200FD 



MEMOIRE 128K 
Se comporte comme 
un ensemble de 4 
32 K, utilisable sous 
Basic etendu, logo ou 
assembleur, se bran- 
che directement sur 
le cote droit du Texas. 
vivemenr conseillee 
oux possesseurs de 
syslemes a disquet- 
tes, en outre cette 
memoire I28K inte- 
gre une interface 
Centronics parallels 
PROMOTION 
1750FD 



PR0GRAMMATI0N Modules 

Extended basic manuel 

francais 800 F D 

Super extended basic 

graph manuel 

francais 1 200 F D 

Extension memoire 

externe128K 1750FD 

Tl LOGO N° 2 manuel 

en francais 895 F D 

MINI MEMOIRE manuel 

en francais 895 F D 



AIDE PROGRAMMATION 
Introduction au Tl 99 n° 1 et 2 les 
deux 100 F D 

Technique des 
programmes de 

jeux 1 e! 2, les deux 100 FD 
Jeux et progammes pour 
le Tl (shift tome 2) 75 F D 
Jeux et programmes pour 
leTI (shift tome 3) 75 FD 
Basic par soi-meme. . . 75 FD 



INTERFACE PARALLELE 

CENTRONICS Tl 

se tranche directement 

sur le Tl et les imprimanres 

a sortie parallele 1 090 F D 

Imprimante SEIKOSHA GP 500 

sortie parallele 2200FD 

Imprimante EPSON 

LX 80 friction 3660 FD 

Tracteur pour LX 80 285 F D 



INTERFACE SERIE - EXTERIEURE 

se branche sur route Imprimante 

sur le Tl 99/4 A ayant 

une sortie serie 1 090 F D 

Machine a ecrire imprimante 

a memoire 

BROTHER EP 44 2390FD 



MANETTES DE JEUX 
Manettes ae jeux Texas USA 

la poire 250FD 

Interface Wico avec manettes 

Quickshotn l 200FD 

Interface Wico avec manettes 
Quickshot n° 2 220FD 



KIT BASIC SUPERGRAPH 
Ce kit permet de transformer le ba- 
sic etendu mechatronic en basic 
supergraph. Cette transformation 
se fart directement sur votre modu- 
le de basic etendu qi/il est neces- 
saire de rapporler au mogasin 
L' utilisation de ce module trans- 
tor me n'est possible qua vec une 
extension memoire de 32 K ou 
128 K. Gorde les tonctions du ba- 
sic etendu, dans son integralite. 
495FD 



CONSOLES ET 
ACCESSOIRES Tl 99/4 
CQble liaison magneto/ 

cassettes 95F D 

Magneto/cassettes 
LANSAY garanti 
compatible Tl 

+ cflble 370FD 

Micrc-ordinateur 
TI99/4APAL. 1100FD 
Modulateur Secam/ 

France 400FD 

Modulateur 

Pfirrtel/france . 500 FD 

Synrhetiseut 

de paroles . . . 600FD 



Tl WRITER 

Le trditement de texte TE- 
XAS : un module, deux dis- 
quettes. 

Permet Id mlse en page 
simple et rapide de vos 
textes avec sortie sur 
imprimante:. .1500FD 



PASCAL 

Necessite le boitier peri- 
pherique. Nouveau Ian- 
gage de programmation 
structures Comporte 
tediteur, rassembleur, le 
linker, et la carte P. code 
qui contient toutes les 
routines necessaires a 
^elaboration de votre pro- 
gramme. Necessite la 
32 K 

OFFREEXCEPTIONNELLE: 
3J300FD 



BOITIER PERIPHERIQUES 
AVEC CONTROLEUR 
DE DISQUE. 

Disque simple face -sim- 
ple densite. Raccords a 
rordinateur. 

OFFREEXCEPTIONNELLE: 
4950FD 




MASH 



POLE POSITION 



MUSIC MAKER 



f T i 





FOOTBALL 



ADVENTURE 



BUCK ROGERS 



LERUOS SACRE 
TIM/M 




T199/4A N*3 



UES7SOROER8 




TI99/4A N*S 



RUBIS SACRE , 
JEUX D'AVENTURE EN 
BASIC ETENDU 
PARTEZ A LA RECHER- 
CHE DU PLUS GROS 
JOYAUX DU MONDE 
(EN FRANCAIS). 
7SORCIERS, 
NOUVEAU JEU DAVEN- 
TURE EN BASIC ETENDU, 
4 EPREUVES POUR RE- 
CUPERER 7 DIAMANTS 
ET VAINCRE LES SOR- 

CIERS; 

JEU DE DES, TIR AU PI- 
GEONS, PARACHUTA- 
GE, BILLARD, ACTION 
ET STRATEGIE 90 Frs 



LOT N° 2 

MODULE BASIC ETENDU 

MANUEL BASIC ETENDU EN FRANCAIS 

LIVRE 50 PROGRAMMES DE JEUX 

K7HEBD0GIGIELN°1 



L'ENSEMBLE . 



....J395 F D 



HEBDOGICIEL SOFTWARE 
HEBDOGICIEL N°l .... 50FD 
HEBDOGICIEL N° 3 b.e. . 90FD 



HEBDOGICIEL N° 2 b.e. 
HEBDOGICIEL N° 4 b.e. 



90FD 
90FD 



L0TN°3 

PROGRAMMATION LOGO. 
MODULE Tl LOGO II EN FRANCAIS. 
EXTENSION 128 K INDISPENSABLE. 
MANUEL ^INITIATION EN FRANCAIS 
L'ENSEMBLE 2300FO 



LOT N° 4 

INTlKr-ACE SERIE EXTERIEURE 
IMPRIMANTE EPSON PW 40 
(COMPATIBLE Tl ET MINITEL) 
2830FD' 



BON DE COMMANDE PROMO 



Norn 






Prtnom 










Tel _._. ..... 










Ville 



Participation express recomrnande jusqiffj 5 kg : 30 F 

LAREGLEACALCUL. 

65/67, bd Saint-Germaia 75005 PARIS 

Tel.: 43.25.68J38- Telex ■ ETRAV 220064 F/1303 RAC 

L ivraison des produrts disponibles dans la limite 

des stocks disponibles sous 8 jours. 

parking gratuit Maubert-Lagrange 



MODULES TEXAS ORGANISATIONS 

Gesrion de fichiers 260 F a Gestion de rapports 375 FD 

Gestion privee 360 F a Statistiques 350 FD 

Multiplan microsoft 11501'..: Edireur assembleur 690 FD 



MODULES D'ACTION 
Parsec 

Congo Bongo 
Munch mobile 
Buck rogers 
Retour du pirate 
Masti 
Hopper* 



250FD 
250FD 
250FD 
350FD 
250FD 
250FD 
250FD 



Jaw breaker* 150FD 

Moonmlne 250FD 

Adventure land 150FD 

Burger time* 250FD 

Startreck 250FD 

Treasure Island 250FD 



MODULES ATARISOFT POUR Tl 99 






Moon patrol 


219FD 


Defender 


219FD 


Jungle hunt 


219FD 


Picnic Puranola 


250FD 


Pole position 


250FD 


Donkey Kong 


250FD 


Protector II 


250FO 


Miss Pacman 


250FD 


MODULES LOISIRS 








Conned Four 


120FD 


Jeux video 2 


174FD 


Jeux retro 1 ou 2 


120FD 


The attar* 


120FD 


Invaders 


206FD 


Othello 


206FD 


Car wars 


120FD 


Munch Man 


206FD 


Football 


250FD 


Crtasse aux wumpus 


120FD 


Zero zap 


120FD 


Video Chess 


350FD 


Alpiner 


206FD 


Music maker 


250FD 


Rotor raider 


120FD 


Frogger 


250FD 


Tomoston dly 


120FD 


Chrishotm trail 


120FD 


Hangman (le pendu) 


120FD 


Q-Best 


120FD 



MODULES EDUCATION 
Addition-Substraction I 120FD 

AOOition-Subslrocrion II 120FD 
Addition^anon 120FD 

Division demolition 120 Fa 

SERIE JEUX D'AVENTURE 
Adventure pirate 350 FD 

Voodoo coslelK? 150FD 

Gk»sttownK7 150FI 

Count K7 150FD 

Mistery tun house K7 150F1.J 



Early Reading 120FD 

Meteor multiplication" 120FD 

Multiplication I 1 20 F 1 i 

Alligator mix 120FD 

Savage island K7 150FD 

Pyramide of doom K7 150FD 

Demon attack K7* 250FD 

Streechodvss6eK7 150FD 



Pour rochat de 2 modules, un 3" gratuit parmi ceux marques 
dun'saut pour les modules en promotion a 50F. 



LIVRE II 99 INTERNE 

Ouvtage en anglais contenant le listing de la ROM 
desassembiee 195FD 



